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ABSTRACT 



When a programmer writes a microprogram, as a part of a machine’s 
instruction set or to implement an algorithm in microcode for faster 
execution, he must be concerned with the smallest details of the hard- 
ware in the machine. Microprogramming exists at the lowest (closest to 
the machine) level and is the most tedious computer "language" to pro- 
gram. In the field of computer design, where microprogramming is used 
most extensively, designers use microprogramming to perfect instruction 
sets and to optimize frequently used routines. 

A computer-aided design tool called a microcode generator is pro- 
posed in this thesis. It is an interactive, menu-driven functional pro- 
gramming tool. The user builds a microroutine by selecting functions 
from a series of menus as they are presented in a logical sequence. It 
is implemented in the language C on the Naval Postgraduate School Com- 
puter Science Department's VAX 780 computer using the Unix program 
development system components. The microcode generator is designed to 
produce microroutines targeted for a specific machine, the Am29203 
Evaluation Board, an ALU implemented in bit-slice components. 
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I. INTRODUCTION 

A. MICROCODE GENERATOR PROPOSED 

Programming in microcode is not like programming in a structured 
language like Pascal or like machine level assembly language. High 
order language programs aren't written with concern for computer 
hardware or any of the internal details concerning program execution. 
Programmers concerned with the contents of registers; say, compiler 
writers, must be more familiar with the internal components of the 
computer. They can't easily generalize their programs to work with 
several different computers like a Fortran programmer, but it can be 
done. Microcode programmers must be even more specific in their 
concern for the hardware. 

The microcode programmer is most likely to be a member of the 
design team for a new processor or specifically involved with computer 
control unit implementation. The ones and zeros (which make up the 
microword) are direct signals to the hardware components. Designs for 
machine instruction sets and supporting registers, PROMs (Programmable 
ROMs), control lines, etc. involve extensive detail, at a level much closer 
to the machine, which the microprogrammer must know. 

Computer aided design is a relatively new field which sprang into 
being when we needed more complex computers to solve more complex 
problems. Designers could no longer hold all the detail in their heads, 
they needed a computer to help in the design process. For example, 
computer systems generate circuit diagrams in seconds; graphics 
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stations display VLSI drawings, zooming in on selected areas and 
modifying them with a few commands from the user. Few areas of 
computer design are left where tedious tasks haven’t been automated. 
One such area is microprogramming. 

A microcode generator could aid the designer in several ways. The 
generator promotes structured design since it hides the details of how 
the microword is produced. The user could select a function such as 
M add the contents of two registers” and the generator would provide 
the microword which accomplishes the task. The function of microcoding 
could be modularized so that the user only needs to know what input is 
required and what output will be given by the generator. The 

importance of modularization and information hiding was introduced by 
D. L. Parnas in 1972. [Ref. 1] A microcode generator could also help 
reduce the simple coding errors easily made such as writing a *1* 

instead of a *0’, or putting the f 1 1 or *0’ in the wrong bit position. 

A good comparison of the use of a microcode generator would be to 
the use of a calculator. One knows how to add large strings of 

numbers using pencil and paper but the overall task is done faster, 
accurately and without tedious sidetrips by using the calculator. The 
difference between the microcode generator and the calculator is that 
while a parent may worry that with a calculator his sixth grader might 
forget the multiplication tables; the chief designer needn’t worry that 
the use of a microcode generator might spoil his young team members. 
The point is that the programming level required to use a microcode 
generator is already that of expert microprogrammer. The generator 



9 



merely frees the programmer to think higher level thoughts, and thus, 
is truly a needed utility in the area of computer aided design. 

I have implemented a microcode generator for a specific machine; 
the Am29203 Evaluation Board which will be described in the following 
chapters. The generator is written in the high-level language C. C was 
chosen since a well defined standard for the language exists so future 
'’porting' 1 of the program to other machines will be easier. The utility 
program is designed to be interactive with the user and operates in real 
time like a language interpreter. The user selects functions from the 
menus displayed and is provided the appropriate microword. Microwords 
are saved in microroutines which can be stored for later use. The C 
program is currently implemented on the NPS VAX/Unix system. Future 
research plans are to modify it for use with microcomputers. 

Chapter two will provide some background information on micro- 
programming and the microcode generator targeted machine, the Am29203 
Evaluation Board. Chapter three will discuss the design approach used 
in this project. Chapter four will address specific implementation 
problems and data structures used. It will also introduce a preliminary 
user’s manual. Chapter five will contain some conclusions and 
recommendations. 
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II. BACKGROUND 



A. MICROPROGRAMMING 

In order to discuss microprogrammed computer architecture, a 
reference point must be established. Computer architecture is the study 
of the systematic method in which the basic components of computers 
are arranged and interconnected. A convenient reference point is the 
high-level abstraction of a general computer system called the von 
Neumann machine. This idealized concept of the essential organization of 
a computer, developed in the mid 1940 , s, was the key to the con- 
struction of early computers. The von Neumann machine consists of five 
basic elements; the Control Unit, Arithmetic/Logic Unit (ALU), memory, 
input and output. In today’s computer systems the elements containing 
the Control Unit and the ALU have been combined to form the Central 
Processing Unit (CPU) or the processor. 

The Control Unit implements the designed machine level instruction 
set. The machine level instructions or macroinstructions can be 
executed in two ways. Implementation in hardware using combinatorial 
logic was the method used in early computers and by some high speed 
machines today. However, the focus of this thesis is on the modern 
method which implements the control unit using memory or stored logic. 
The contents of the stored logic are called microinstructions. A micro- 
programmed control unit is one in which the more complex macroinstruc- 
tions (op codes) are interpreted (executed one at a time) by sequences 
of primitive microinstructions which are stored in the special memory 



11 



called Control Store. These sequences of primitive microinstructions are 
called microprograms; stored programs that explicitly control the data- 
flow through the physical components of a processor. This method is an 
alternative to performing data-flow control with a network of sequential 
logic circuits. [Ref. 2: p. 5] 

1 . History 

The early computers* instructions for arithmetic and boolean 
functions were directly implemented with hardware. One could look 
inside the computer and trace the circuits responsible for a particular 
function such as multiplication. These basic logic circuits such as AND, 
OR, etc. were constructed from switching devices such as vacuum tubes, 
diodes and transistors. The outputs of the resulting storage elements, 
i.e., flip flops and latches, control the execution of arithmetic or logical 
operations by issuing control pulses over the control lines to specific 
gates in the data flow. In a relatively few machine cycles, information 
is guided to flow over many paths and through many functional units in 
the specific order required for the execution of the macroinstruction. 
Hardware implemented control units require many basic components and 
intricate wiring efforts in their design. They have a haphazard 
appearance due to the mass of wires and circuits placed on the circuit 
board in any place they could be fit. Complex instruction sets were 
difficult to implement because the design task alone was a tremendous 
undertaking. It was a lack of modularity in the design process which 
forced the designers to maintain a complete understanding of the entire 
design in their heads. 
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The disadvantages of hardware implementation are that any 
changes could mean an entire redesign; documentation was scarce; and it 
was difficult to test the implementation since much of it had to be 
working just to test one small portion. The advantages are that it can 
be the fastest running implementation, a small task (simple design) will 
have a simpler solution and the complexity and lengthy design time can 
be justified for high volume applications. In a microprogrammed 
machine each machine-level or macroinstruction is carried out one 
instruction at a time by an interpreter. 

M. V. Wilkes, in 1951, first proposed a microprogrammed control 
unit in a computer. [Ref. 3: pp. 16-18] The microprogrammed method 
was easier to use in the computer design development and engineering 
phases, Wilkes proposed. He and his colleagues sought a means for 
rearranging the circuit design into a systematic order which was easy 
to implement, comprehend and maintain. They were more interested in 
simplifying the design task than in any savings of hardware. It is 
interesting to note that while Wilkes didn’t believe there was any need 
for general purpose computers or the corresponding complex instruction 
set, the microprogrammed control scheme he presented made the concept 
of a general purpose computer feasible. The general purpose computers 
in use today have instruction set sizes on the order of hundreds of 
instructions. The design and implementation of a system of combi- 
natorial logic with such a complex control system would be very expen- 
sive to manufacture. 
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Fig. 2.1 Wilkes Control Unit 



Wilkes viewed the Control Store as consisting of two ferrite core 
matrices. [Ref. 4: p, 497] (See fig. 2.1) A portion of the macro- 

instruction called the operation code or op code was used as input to a 
decoding logic tree. The logic component accepted n bits as input and 
provided 2 n possible output lines, only one of which was selected. 
Thus, a four bit input line could select one of sixteen output lines 
which were the microinstructions. Each output line was configured with 
diodes to select any number of available control lines. The active 
current in the selected output line was passed on by a diode to the 
connected control line in the first matrix. So the configuration of 
diodes on the output line determined which control lines were activated 
for a particular clock cycle and a particular microword. When testing a 
design, these diodes were easier to change than rewiring a new hard- 
ware circuit for a particular function. The 2 n possible diode configured 
output lines represented primitive operations (the microinstructions) 
which when selected in sequences formed short subroutines which 
carried out the function specified by the op code. The second matrix 
was used for sequence control. Each microinstruction could select the 
next microinstruction to be executed. Wilkes* implementation also 
included a provision for some conditional testing and sequencing. 
These diode arrays were the first microprogram memory or Control 
Store. 

2. Development 

While macroinstructions generally effect changes to data in main 
memory, microinstructions reflect register to register data transitions. 
Cycle time ratios between main memory access and control store access 
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are critical. 



There must be sufficient time available per 



macroinstruction for the microroutine instructions to be completed. The 
diode control store method posed no speed problems since the speed 
ratio was about twenty internal cycles per memory cycle. [Ref. 4: p.498] 
The trend of smaller cycle ratios developed quickly, due to improve- 
ments in memory technology. By the early 1960’s main memory cycle 
speed had dropped to under one microsecond. [Ref. 4: p. 499] The ratio 
of internal machine cycles to memory cycles became one or two to one. 
It wasn’t possible to decrease the control store access speed so 
parallelism was needed in data transfers. Multiple data transfers per 
machine cycle resulted in simultaneous control of internal resources. 
The microwords (microinstructions) were made wider to produce more 
control signals per machine cycle. Parallelism was increased with the 
addition of more control signals per microword. However, the use of 
wider microwords required more space in control storage. 

Emulation, the use of control stored microprograms to interpret 
several different processors’ instruction sets on one host system, [Ref. 
5: 405] was implemented by IBM on the System/360 in the mid 1960’s. 
This new application for microprogramming was very important for 
businesses which did not want to have to reprogram old software but 
did want to use new programming languages and develop new appli- 
cations on newer higher performance machines. 

Fast read/write control store was developed in 1970 using 
bipolar monolithic technology. [Ref. 4: p. 499] Thus, the control store 
has the same access time as combinatorial-logic gating delays, since they 
are made of the same material. Writable control storage can be very 
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important in computer system research and real-time, embedded 
computer systems (military applications) since updates and/or config- 
uration changes are more easily handled with the flexibility of 
microprograms which can be over-written. 

The simplest implementation of a microprogrammed control unit 
consists of a register or buffer, timing signals and a ROM (Read Only 
Memory). The register contains the macroinstruction which holds the op 
code to be implemented with a microroutine. The op code is used to 
derive the starting address in the ROM, called control store, of the 
appropriate microroutine to be executed. Each microword contains a 
code indicating that either it's the last microword in the routine or that 
the next sequential microword in control store is to be used next. This 
scheme causes fragmentation or unused portions in control store since 
each starting address is equidistant from the others and thus, all micro- 
routines are alloted the same amount of space even though all routines 
are not the same size. 

A mapping PROM (Programmable ROM) can be used to improve 
the addressing scheme. The fragmentation problem is solved since any 
set of addresses in the control store can be placed in the mapping 
PROM so the microroutines can be any size. With the use of a Writable 
Control Store (WCS) microroutines can be easily changed and new 
starting addresses updated in the mapping RAM (Random Access Mem- 
ory). A MUX (multiplexor) for conditional codes can be added to include 
conditional branching capability. 

Another important improvement has been the addition of a buffer 
register at the output of control store; the pipeline register. Its use 
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allows pipelining, the overlapping of microinstruction execution with 
control store fetches. While the microword in the pipeline register is 
being executed, the next instruction is being fetched from WCS. All 
these improvements over the simple three element control unit provide 
the needed capabilities for an efficient microprogrammed control unit. 

3. Am29203 Evaluation Board Ascription 

An Am29203 Evaluation Board prototype is used for micropro- 
gramming experimentation in the NPS Computer Science Department. The 
evaluation board is built, using bit slice architecture, from various 
bipolar integrated circuits (IC’s) produced by Advanced Micro Devices of 
Sunnyvale, CA. The Am29203 is an implementation of an Arithmetic/Logic 
Unit (ALU). This board is presently used in research at NPS as a 
representative microprogrammable digital system. As the target 
microprogrammable device for the microcode generator, the evaluation 
board is briefly described here, and in more detail in later chapters. 

The board consists of three main IC types and memory for 
Writable Control Store (WCS). [Ref. 6] It uses an Am29203 four bit ALU 
slice. This ALU chip can perform seven arithmetic, nine logical and 
sixteen special functions on two four bit operands. The evaluation 
board cascades four Am29203 , s to provide a sixteen bit ALU. The board 
also uses the Am2904 Status and Shift Control Unit, which supports the 
functions of the ALU. The third main IC is the Am2910 Sequencer used 
in the board’s control unit. It is the microprogram controller for the 
sequence of execution of microinstructions stored in the WCS. It 
provides both sequential access and conditional branching to addresses 
in the WCS. 
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The Am29203 ALU Evaluation Board is set up with a monitor 
which can display and load all memories and registers. To run micro- 
programs, load the microwords in hex into WCS; the status registers and 
macroinstruction registers should be loaded with appropriate data if 
conditional testing is to be performed. Enter the command G (for Go). 
After execution the registers and/or memory can be inspected (dis- 
played) for indications of the intended results. The execution of a 
microroutine can be halted or paused and breakpoints can be set. The 
board is manipulated via the monitor much like a debug utility program. 

4. Microword Format 

The microword used to control the evaluation board is 48 bits 
wide. It incorporates the techniques of bit steering; using a bit or 
field of bits to determine the meaning of another field, [Ref. 5: p. 172] 
and vertical programming in some fields. The microword is organized 
into three main fields which control the three main IC’s mentioned 
above. A discussion of the function of each bit of the microword 
follows, starting with the most significant bits: [Ref. 6: pp. 3.10-3.12] 

47-45: Controls the selection of the register address fields 

which select the microinstruction pipeline register 
(the output microword from WCS) or the macroin- 
struction register as either the sources for the 
ALU operands or the destination of the ALU opera- 
tion result. 

44-32: Control fields for the ALU: 

44: Enables ALU output to ALU registers. 

43: Enables ALU output to the Y bus (the main data 

bus). 

42-40: ALU source operand selection. 

39-36: ALU destination selection. 
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35-32: 


ALU function selection. 


31-16: 


Control fields for the Am2904, Status & Shift 
Control chip: 


31-30: 


Controls carry-in. 


29-24: 


Called 15-10. These six bits control the micro and 
macro status registers. This field is highly depen- 
dent on other fields, and is extremely difficult to 
coordinate when programming. 


23: 


Enables micro status register. 


22: 


Enables macro status register. 


21: 


Command enable to use 19-16 as a command field 
for special functions of the ALU. 


20: 


Shift enable to use 19-16 as shift control. 


19-16: 


Used as a field for ALU special functions, for shift 
control, or for status enable. 


15: 


Monitor breakpoint bit. 


14: 


Not used. 


13-0: 


Control fields for Am2910 Sequencer: 


13-4: 


Branch address; or in conjunction with bits 47-45 
could be used for data constants or to specify ALU 
registers as sources of data or addresses. 


3-0: 


Sequencer instructions. 



Following chapters will go into greater detail when addressing 
the design approach to implementing the functions of the different fields 
in the microword. 
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III. DESIGN APPROACH 

Design may be defined as the process of applying various 
techniques and principles for the purpose of defining a device, a 
process, or a system in sufficient detail to permit its physical 
realization. [Ref. 7: p. 128] The field of software engineering has two 
general aspects. One aspect contains the general theories and 
principles proposed and tested over the last fifteen years, as the art of 
producing software became a science, i.e., a more disciplined approach 
was needed to combat the recognized ’’software crisis” of skyrocketing 
development costs of software beginning in the 1970s. For example, 
Edsger W. Dijkstra wrote, in 1968, a now famous letter called "Go-To 
Considered Harmful.” [Ref. 8] He had discovered that the difficulty in 
understanding programs making heavy use of go-to statements was a 
result of the "conceptual gap" between the static structure of the 
program in spatial terms and the dynamic structure of the program in 
temporal terms. This is called the Structure Principle. [Ref. 9: p. 137] 
Another accepted concept was mentioned in chapter one; the Information 
Hiding Principle first proposed by D. L. Parnas in 1972. The second 
aspect of software engineering is the large group of methodologies or 
techniques available which are specific design tools and solutions for 
virtually any software engineering problem in existence. Thus, we have 
principles on one hand and practices on the other. In this chapter I 
will explain some software principles and accepted practices I have used 
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in the design approach to the problem of building a microcode 
generator. 

A. USING SOFTWARE ENGINEERING THEORY 

The selection of the program development system and programming 
language to use depends on the main features of the project to be 
designed. The microcode generator utility is interactive, featuring 
menu-driven versus command-driven microinstruction functions, i.e., the 
functions are selected through a series of menus presented on a 
monitor. The program acts very much like an interpreter; a one-pass, 



step-by-step 


translator. 


The 


microcode 


generator 


functions are 


modularized 


and separated 


into 


function 


procedures 


which can be 



offered as possible selections by the user in one menu on one monitor 
screen. The combination of this modularity and the use of menu-driven 
function calls support the theory that structured software programs are 
better in that they are more understandable and easier to implement 
with structured programming languages. The program is relatively large 
and complicated. It has two main modules, the sequencer module 
contains eleven submodules and the ALU module contains fifteen 
submodules. There is a main utilities module which contains fourteen 
modules. The two main modules and a housekeeping module frequently 
call on the procedures in the utilities module, which do most of the bit 
manipulation within each microword. Thus, the main features of the 
microcode generator are its use of interactive communication with the 
user, menu-driven information flow and complexity. 
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Such a large, complicated and interactive program is more easily 
developed on a medium to large computer. Using a microcomputer for 
the program development would involve more work on the programmer’s 
part to manage a small memory, the storage of data arrays and the 
overhead of the interactive feature. The VAX 780 computer running the 
Unix operating system was chosen for its easy-to-use program 
development system, convenience (located on campus), and because 
previous thesis work on this project had been done on the VAX. 

The programming language used to implement the program needed to 
be a modern structured high level language available for use on the 
VAX but portable enough to allow the program to be adapted for use at 
a microcomputer workstation. I chose the C language for its portability, 
since a well-defined and accepted standard had been established by its 
authors, Kernighan and Ritchie, [Ref. 10] and for its success as a 
systems programming language. The latter is important since quick, 
efficient code and access to system functions, the characteristics of a 
systems programming language, is needed in an interactive program 
performing in real time. The previous implementation of the microcode 
sequencer portion of the target machine had been written in Berkeley 
Pascal. I chose to rewrite this section in C since the two languages 
employ different parameter passing modes and data couldn't be passed 
between the different modules. Pascal, a language designed primarily as 
an educational tool for teaching structured languages, was also ruled 
out because of its limited capabilities in input/output processing. One 
of the main differences between Pascal and C is C's capabilities in 
systems programming. For Pascal to do some of the same sort of data 
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manipulation, it would have to violate the Security Principle. This 

principle states that no program should violate the definition of the 
language, or its own intended structure. [Ref. 9: p. 7] The C language 
contains powerful features that give it considerable flexibility. Like 

other languages in the structured category, C supports strong data 
typing, makes extensive use of pointers, and has a rich set of operators 
for computation and data manipulation. [Ref. 7: p. 277] So the definition 
of the C language contains the needed features that Pascal must violate 
its own definition to effect. 

Modularity, information hiding and portability are a necessary 
influence on the design of this project. In order to achieve portability 
to other compilers and machines, some care is needed to provide for 
information hiding, i.e., generality within the modules and passing the 
machine and/or compiler dependent data through the interfaces between 
modules. Thus the modules themselves can be used for any machine or 
compiler and only the interfaces need be changed. The C language has 
a preprocessor feature which allows constants to be defined (using 
#define statements) and placed in a separate module to be "included” 
(using #include statements) as a separate file. Thus, we could have 
separate definition "include" files for different machines and compilers. 
This is a standard feature of the language. 

The above principles are associated with good design and 
programming practices. Using them as guidelines for the selection of 
the basic hardware and software tools for this project ensures quality 
of the end product. 
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B. MAN/MACHINE INTERFACE CONSIDERATIONS 



Man/Machine interface discussions usually center on graphics 
capabilities. However, the design of the microcode generator is not so 
concerned with the way a general user views the screen, but with the 
way an expert user thinks through the problem of microprogramming. 
As stated in an earlier chapter, the user is assumed to be an expert in 
microprogramming and familiar with the specific machine for which this 
program is written to produce microcode. This new utility will improve 
his productivity and provide ease and flexibility in his design work. As 
he uses the program, he should be comfortable with the sequence of 
menus presented so that as he decides what the next step of the 
microprogram should be, the method to take that next step is before him 
on the screen as one of the menu selections. The most common theme 
heard from interactive systems designers is embodied in Hansen's First 
Principle: Know the User. [Ref. 11] This principle is of primary concern 
in this software implementation project. 

There are more general human characteristics which must be dealt 
with in any interactive design. Humans have a short term memory 

capacity of only about 5-7 objects. Memorization can be minimized by 
using function selection versus command entry methods and using names 
instead of numbers for the choices. The microcode generator program 
menus do use names except when numbers are the object of the 
selection. "Muscle memory" refers to the idea that users develop the 
feel for frequently used keypresses. This means that the same function 
in different menus should be initiated in the same way; help or return 
to higher level, for example. 
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Another important interface consideration is the input device(s). 
Thus far no other input devices are available for use with the VAX 
development system used in this project. However, an excellent input 
device for selection is the mouse. Its most common criticism is that it 
takes the user's hands from the keyboard, but this is important only to 
word processing applications where speed typing is advantageous. The 
microcode generator's user will have his attention focused on the screen 
which is perfect for using a mouse. When the code generator is 
adapted for use on a microcomputer workstation a mouse could be 
implemented as the input device for menu selection. Using a mouse also 
creates muscle memory which improves the user's productivity. Other 
input devices include joysticks, speech recognizers, tablets, etc. Speech 
synthesis and recognition quality is improving quickly but the mouse 
has the characteristics of simplicity, flexibility and cost effectiveness 
which make it a very popular device for use with interactive programs. 

C. METHODOLOGY USED 

Once software engineering concepts are understood, actual 
implementation of a project is the next step. The explanations of what 
is going to be done, using what guidelines, who is going to do it and 
why it's important, have all been presented. The next step is how to 
implement the microcode generator. Every company and government 
agency responsible for producing software has some formal or informal 
development methodology, a collection of methods, chosen to complement 
one another, along with rules for applying them. [Ref. 12: p. 14] The 
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methods chosen to design and implement the code generator will be 
discussed in the following sections. 

1. Specification Phase 

The basic requirements of the specification phase of a software 
development project are to describe the intended data flow and data 
structure to be realized in the program, provide a description of the 
program functions, and establish and maintain communication with the 
user. [Ref. 7: p. 95] 

The internal structure of the C source program is modular in 
that each logical microprogramming function, selecting the branch 
address to be used in the sequencer portion of the microword for 
example, is implemented as a separate procedure. (Procedure is a 
generic term for what is called a function in C.) Also the "main” 
procedure does little but initialize, call the modules selectable from the 
master menu and help the user exit the program. 

This modularity is necessary when a top-down design technique 
is used as in this program. Top-down or stepwise refinement begins 
with a high-level representation of software procedure. First, the 
"main" program or driver program is defined; then each procedure 
called by the driver program is written in code and so on. [Ref. 7: p. 
131] With this technique, the program can be written and tested in 
more manageable pieces. This is a far better method of design than 
writing the entire program before trying to run it. The most important 
reason is that the user can be involved to provide early guidance from 
his, the most important, point of view. 
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The external structure is the dynamic flow of the program from 
the user’s point of view. The motivation for writing the microcode 
generator is to make microprogramming easier and less time consuming. 
An example of a microcode generator in use is AMDASM™ which is 

available on Advanced Micro Devices System/29™. [Ref. 13: p. 10] This 

tool is not interactive and is quite complicated although it is quite 

general. The interactive nature of this project's code generator makes 
the program more "user-friendly." The menus help the user concentrate 
on the problem to be solved rather than how to run the program. 
Thus, the flow of the program is directed by the hierarchy of menus. 

The descriptions of the functions implemented in the program 

must be specified in this phase. Any changes to these specifications in 
a later phase will mean a slow-down in the development of the software, 
since most work must stop while the implementer backtracks to effect 
the changes. A general description of the program's functions follow, 
a. Sequencer Functions 

Once the user selects a sequencer code, the sequencer 

module of the microcode generator determines what support data is 
needed. If the selected code requires a branch address and/or 
condition codes, it requests the data using further menus. Then it 
provides informational messages if the sequencer code selected is 
dependent on other sequencer codes which must precede or follow it. 
Provisions must be made for " remembering” the user's selections to 
ensure that subsequent changes to the sequencer code in the same 
microword remain consistent with other fields of the microword. 
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b. Support Functions for the Sequencer 

Shift and condition code fields implemented as a result of 
selected sequencer code functions are incorporated into the sequencer 
module of the program. Conflicts between shared function fields are to 
be resolved or gracefully handled. That is error messages must be pro- 
vided which don’t "crash" the program or cause undetected erroneous 
results. A requested function may have up to seven possible bit pat- 
terns. C language structures which hold constant data for comparison 
of microword bit pattern options are used to resolve conflicts in shared 
function fields. If none of the possible patterns are compatible in the 
same microword fields then the user is informed and the requested 
function is denied. 

c. ALU Functions 

Once the ALU function code is selected, the ALU module of 
the program determines which type of ALU function it is, either a basic 
function or a special function. Following the same guidelines as pro- 

vided for sequencer functions, it determines what follow-on data is 
needed to microcode the ALU fields of the microword. This is done by 
presenting appropriate menus based on user choices already selected. 
Each menu may lead to several additional menus, depending on the 
selection made. After the ALU function is selected the user is prompted 
for operand source data, results destination data with choices for shift 
register manipulations on the results, a decision to enable the Y bus, 
and source register selections if any. The same data structures and 
utilities that are applied in the sequencer module are used. 
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d. Support Functions for the ALU 

The microcode for the shift fields, command fields and 
register selection fields associated with selected ALU functions are 
incorporated into the ALU module of the program. The same data struc- 
tures, utilities and constraints concerning conflicts and errors are used 
as in the sequencer module. 

e. Common Functions 

Each menu has a selection available for help and return to 
a higher level. When help is selected, an informational message is 
displayed to clarify the menu presented and a reference to a manual or 
data book is provided if possible. Selecting return to a higher level 
displays the previous menu. The user can exit the program entirely by 
repeating the return selection. 

f. Housekeeping Functions 

These functions comprise the third major module of the 
program. They provide the capability for the user to build micro- 
routines by adding microwords to a file as he creates them using the 
sequencer and ALU modules. The user may also save, list, scan, modify, 
delete and print microroutines. These latter functions will be available 
from the master menu and some of them will be available from the 
sequencer and ALU modules. 

2. Design Phase 

The design phase is the process through which requirements, as 
determined in the specification phase, are translated into a 

representation of software. [Ref. 7: p. 129] The goal in this phase is to 
produce a "model" from which the final product will be built. This step 
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in the development of a software project can be compared to the build- 
ing of a prototype in an engineering project. 

The ’’models” used to represent the program are hierarchical 
module organization charts. In figure 3.1 the hierarchical structure 
between the major modules is shown. Figure 3.2 shows the relationship 
between the menu calling procedures. This model reflects the rela- 
tionships between the menus and shows the program structure from the 
user's point of view. These two models are adjusted until the internal 
program structure (figure 3.1) supports the external structure (figure 
3.2) which is the user's point of view of the program. 

3. Implementation Phase 

In very general terms, the implementation or coding phase 
translates a design representation of software into a programming 
language realization. This coding process begins when the programmer 
puts source code on paper and continues until an executable form is 
produced by the computer. Improper interpretation of design models is 
a primary concern in this phase. [Ref. 7: p. 267] The characteristics of 
the programming language used influence the way the programmer 
thinks when implementing the design. Earlier in this chapter I 
discussed the reasons why a modularly structured design should be 
implemented using a structured language. The ease of design-to-code 
translation is an indication of how well the language mirrors the design 
representation. C's support of structured programming and rich set of 
operators make the design-to-code translation very smooth. 
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Main Module 

Sequencer Command Menu 
ALU Basic Function Menu 
ALU Special Function Menu 
Routine Manipulation Menu 



Sequencer Module 

Sequencer Branch Address Menu 
Sequencer Condition Select Menu 
Am2904 Conditional Test Menu 



ALU Module 



Called from Main Module: 

ALU Basic and Special Function Menus 

ALU Operand Source Menus 
ALU Result Destination Menu 
ALU Register Address Menu 
ALU Direct Source Menu 

ALU Instruction and Output Enable Menu 
ALU RAM A Register Select Menu 
ALU RAM B Register Select Menu 



Fig. 3.2 User's View of Menu System 



33 



4. Test and Evaluation Phase 

Testing within the context of software engineering is actually a 
series of four steps that are implemented sequentially. [Ref. 7: p. 295] 
Unit testing is a test of each procedure as it is produced. Integration 
testing addresses the issues associated with the problems of verification 
and assembly of all modules in the program. Validation testing provides 
assurance that the software meets all functional and performance 
requirements. System testing verifies that the program meshes with 
other systems in the user's environment. 

The procedures of the microcode generator were tested as units 
and integrated with the program as they were coded. Thus, the first 
two steps were executed concurrently. 

E. W. Dijkstra is quoted as saying, "Program testing can be 
used to show the presence of bugs but never their absence/' Could 
exhaustive testing (even if possible) prove a program correct? No, 
because you don't know when all tests are exhausted. In testing the 
code generator, the top-down design, modular structure of the program 
made the task easier since functions were broken into small pieces as 
procedures. Each unit was tested by running it with both expected and 
unexpected data. 

5. Maintenance Phase 

Software maintenance is far more than just fixing errors in a 
program; it consists of all support for the product once it released. 
There may be several versions of the same program which need support. 
The maintenance of existing software can account for over 60 percent of 
all effort expended by a software development company. [Ref. 7: p. 322] 
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Software maintenance may be defined by describing four ac- 
tivities that are undertaken after a program is released. Corrective 
maintenance includes diagnosis and correction of any errors which may 
exist after the program is released. Adaptive maintenance is the 
activity that modifies software to properly interface with changing 
system support. Perfective maintenance provides the software package 
with new capabilities, modification of existing functions and general 
enhancements requested by users of the product. Preventive 

maintenance is done to improve future maintainability or reliability. 
This type of maintenance is still relatively rare. [Ref. 7: p. 323] 

Academic research projects don’t have the same requirements for 
maintenance as a new product in the commercial market. The 
maintenance of the program generator will depend on the availability of 
interested students for further research. However, further work is 
needed in this project. This thesis is just a small step in the 

development of a fully generalized functional microcode generator. 

D. SUMMARY 

Software engineering is still more of an art than a science, even 
though the application of systematic methodologies began about a decade 
ago when software developers faced the software crises. But, the use 
of a more disciplined, engineering approach to software design has 
helped developers manage more efficiently the large, complex type of 
problem solutions undertaken in the 1980’s. 

The microcode generator implementation is a large and complex 
problem for one person. Thus, the "modularizing” of the process, i.e., 
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breaking the project up into the distinct steps of specification, design, 
implementation, test and evaluation, and maintenance helped me to 
conceptualize the entire process. In shipboard administration terms, I 
formed a "Plan of Action and Milestones," a POA&M, and carried it out. 

The next chapter will address specific data structure 
implementations, coding problems and introduce a preliminary user’s 
manual. 
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IV. IMPLEMENTATION 

The planned sequence of implementation was discussed in the 
preceding chapter. In this chapter I will address specific decisions 
concerning required data structures and the general composition of the 
source program for the microcode generator. This discussion will 
include the general utilities, the housekeeping utilities and the header 
files. A section on how to run the program is provided as a guide to 
using the microcode generator. The last section of this chapter 
addresses some ALU implementation difficulties. 

A. MENUS 

Interactive programs can be designed to interface with the user in 
two ways; command-driven or menu-driven. The command-driven method 
requires the user to know what commands are available, and the rules 
and syntax necessary to use them. The menu-driven method is more 
"user-friendly" since the user is allowed to pick from a menu of 
available functions; he doesn’t need to memorize a great deal of detail. 
The tradeoffs between the two methods are speed and flexibility in the 
first case and ease of use in the latter case. The main decision point 
when choosing between the methods is at the point where a program 
becomes too complicated for even experienced users to remember all the 
commands needed to effectively use the program. The menu-driven 
method was chosen for this reason, i.e., there are too many possible 
functions available to be remembered in the command-driven method. 
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Current macro-assembler type microprogram generators use batch style 
execution, are thus command-driven programs and are less 
” user-friendly.” 

To estimate the number of commands that would be required in a 
command-driven program is not difficult once the menu-driven version 
exists* Each option on a menu represents a required command or 
subcommand in a command-driven version. The sequencer portion of the 
microcode generator program has 6 menus including a total of 54 options 
to choose. The ALU portion has 20 menus including a total of 214 
options to choose. This totals 268 commands. But, each menu in both 
portions has a "Help" and "Return to Higher Level" option; so these can 
be combined to function under only two commands for all menus. So, we 
have a total of 268 - 2*(20 + 6) + 2 = 218 commands which would be 
required in a command-driven method. The interdependencies of some 
of the microword’s bit fields would further complicate a command-driven 
structure, and these are only the functional microprogramming 
commands. The housekeeping functions like saving, listing, scanning 
and printing micro-routines also need commands. Since the average 
number of options per menu is 10, that number should be added to 
account for the housekeeping module. So, the final total of needed 
commands in the command-driven method is at least 228, not counting 
the effect of field dependencies. This is not a reasonable number of 
commands to expect a user to remember in a task like microprogramming. 

The microcode generator program was written using the following 
general concept of program flow: Write a menu to the screen, and then 

trap and test the user’s response using the C language SWITCH 
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construction (the equivalent of the Pascal CASE construct). [Ref. 10: p. 
54-56] The SWITCH case which matches the user selected menu option 
implements the function requested, perhaps displaying further menus 
from which the user selects the proper parameters for the function 
desired. This menu, SWITCH, implement, menu, SWITCH, implement ... 
continues until the user selects the "Return to System" function. The 
program is roughly half menus and half SWITCH constructs. 

B. DATA STRUCTURES 
1. The Microword 

The forty-eight bit microword for the Am29203 Evaluation Board 
was designed to provide a representation of the functions for a general 
purpose sixteen bit ALU. 1 The microword, as designed, uses the 
concepts of both horizontal and vertical microprogramming . [Ref. 4: p. 
501] In a horizontal microword there are many bits for the control 
lines, providing a parallelism in resource handling. This method is 
costly in terms of memory space but is very fast since there is only one 
level of control. A vertical microword has fewer bits and needs further 
decoding to determine which control lines are affected. It is a memory 
space efficient method but usually executes slower than the horizontal 
word because it has several levels which are decoded to determine the 
control lines activated. 

The specific fields in the microword are described in chapter 
two. Several of the Am29203 Evaluation Board functions share bit fields 



1 The Am29203 Evaluation Board was described in chapters one and 

two. 
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in the microword. The register select fields and branch address fields 
share microword bits 36-43. 2 The command and shift fields share bits 
28-31. Steering bits 26 and 27 control the enabling of the command and 
shift fields respectively. That is, when bit 26, the command enable field 
is turned on, the command field is enabled in bits 28-31. When bit 27, 
the shift enable field, is on the shift field is enabled in bits 28-31. If 
both the steering bits are on then the field is shared in time as well as 
spatially. The microword won’t make sense unless a compatible bit 
pattern between the shift and command functions can be found. When 
microprogramming by hand, this is the problem the programmer must 
solve in order to optimize his program. The ALU module of the design 
tool implements a procedure which checks for compatible bit patterns 
when potentially conflicting functions are requested. If no compatible 
pattern can be found, the two functions must be coded in two separate 
microwords. Further detail on the specific interrelationships of the 
microword functions can be found in Reference 6. 

The microword, itself, is implemented in a character array data 
structure. It is initialized at the start of the program with X’s which 
represent unassigned or "don’t cares"; if any remain after the process, 
they are assigned a one automatically. The microword is displayed, at 
appropriate points in the user’s session, bit-by-bit and as twelve hexa- 
decimal values, using the utilities Display_word and Display_in_hex. 



2 Chapter two uses the conventional bit numbering method of right 
to left (47-0). However, in this chapter the microword bits are 

numbered 0-47 from left to right. This conforms to the element numbers 
in the microword array. This method is used since the programs’ 
source code is written this way, and the reader can more easily refer to 
the listings provided in Appendix B. 
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2. The Docu-word 

The Docu-word is a 24 element, integer array data structure 
used to ’’remember” the function choices requested by the user. This 
’’documentation” feature of saving all function choices made by the user 
is necessary to provide such user-friendly features as warning the user 
when he has requested functions which produce conflicting microcode 
and allowing the user to change previously created microwords. A 
docu-word is created as each microword is built. Each element of the 
array corresponds to a ”docu-field” which represents a function 
available in the microinstruction. 

Each Evaluation Board function is represented as an element of 
the docu-word. The entire docu-word is initialized with zeros, 
indicating that no functions are requested. A docu-field assigned the 
value -1 means the function it represents has been requested by the 
user and the particular choice can be obtained from reading the 
appropriate bit field in the microword. This code is used when there is 
no overlapping or multiple function. A positive integer in a docu-field 
means the corresponding function has been requested and the value of 
the integer indicates a particular sub-function choice. 

3. Docu Utility 

The Docu utility consists of a SWITCH construct using the 
selected function’s docu-field as the case value. Each case assigns the 
proper code, as described above, to the selected docu-field to store the 
user’s function requests. Docu is called from the utility Field_set; both 
procedures are in the utilities module. Docu and Field_set, (Field_set 
will be described in the next section) although used as utilities, are also 
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data structures since they establish, in the cases of SWITCH statements, 
the relationships and dependencies between the physical bit fields of 
the microword and the functional docu_fields. That is, they use the 
function requests and the ’’documentation” or history of requests for a 
particular microword as input and by following the logic contained in 
the SWITCH cases, produce the properly coded bit pattern for that 
microword. 

4. Field^set Utility 

The Field_set utility consists of a SWITCH statement with a case 
for each physical field. Field_set is called whenever a user selects a 
function to be microcoded. The parameters passed to Field_set are 
field_cnt, sub_set and choice. Field_cnt is the argument to Field_set's 
main SWITCH and indicates the case which refers to the appropriate 
physical field. Sub_set contains the integer code which is used in the 
docu-word to distinguish between classes of functions. Choice holds the 
character pointer indicating the menu option the user selected. In most 
menu functions, the ’’choice" is eventually converted by a SWITCH to the 
bit pattern used in the microword. 

Each case in Field_set's SWITCH is a small procedure in itself. 
In general, when a case is selected it first checks the status of the 
corresponding docu-field. As discussed in the previous section, the 
corresponding docu-field value will be zero if it isn't set and a -1 or 
positive integer if it is set. When the appropriate case checks the 
docu-field status, if the value is zero, then the proper coded bit 
pattern is placed in the microword and the docu-field is set to -1 or a 
positive integer. If, however, the docu-field value is not zero, then it 



42 



has been set previously, and a message is written to the screen for the 
user to confirm that he intends to change the function. If the user 
does not confirm, no changes are made to the microword or docu-word. 
If a change is confirmed then the docu-field and microword are both 
modified to represent the new choice. If the previous function set 
other physical fields then the old docu-field value will indicate which 
other physical fields need to be erased or reset. 

When the requested function shares physical microword fields 
with other functions, the status of the docu-field's of those other 
functions must be checked also. If their docu-field values are zero 
then no conflict exists. However, if they have been set, then a potential 
conflict exists. If both functions have no alternate bit patterns, then a 
message is written to the screen informing the user that a conflict 
exists; no changes will be made. If one or both functions have alternate 
bit patterns then a compatibility checking algorithm provides a 
compatible bit pattern if one exists, or produces an error message. The 
compatibility algorithm is discussed later in this chapter. 

For a fairly complex example illustrating the use of Docu and 
Field_set consider the selection of a sequencer control code. The user 
selects "sequencer command” from the main menu; then selects, for 
example, choice *7*, the "conditional jump via register/pipeline" command. 
This is a sequencer command which requires a value be placed in the 
branch address field of the microword and provides for conditional 
testing as well. The main SWITCH statement in the command select 
procedure of the sequencer module calls the Field_set utility with 
parameters field_cnt = 24 (the Field_set SWITCH'S case concerning the 
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sequencer); sub_set = 4 (the sequencer command function divides the 
sequencer codes into four classes); and choice = f 7\ A sub_set value of 



1 would mean 


that 


only 


the sequencer 


logical 


field 


is 


coded. 


(The 


sequencer 


field 


is 


coded 


for all cases.) 


A 2 


means 


that both 


the 


sequencer 


and 


branch address fields are coded. 


A 


3 means 


that 



conditional tests are set. A 4 (the value in this example) means that all 
three functions; the sequencer field, the branch address field and 
conditional test fields are set. 

The first step is to check the history of the function in the 
appropriate docu-word field. If the docu-field’s value is zero, then it is 
set to 4 (passed from the sub_set parameter), this stores the information 
that a class 4 sequencer code is being set. Field_set then places the 
proper bit pattern for a choice *7% "conditional jump via 

register/pipeline", in the sequencer physical field; bits 44-47 are set to 

0111 . 

However, if the docu-field for the sequencer function is already 
1, 2, 3 or 4, then the sequencer code field has been set by a previous 
request. The user is then prompted to confirm that he desires to 
change the sequencer code. If so, then fields previously set are erased 
(set to 'XXX...'; these are indicated by the code in the docu-field), the 
new sequencer code is set, and the docu-field is set to 4. 

After the sequencer code is set, the menu for selecting the 
branch address is written to the screen. The user is then prompted to 
enter the desired branch address. The branch address select procedure 
then calls Field_set with field_cnt = 19 (the SWITCH case in Field_set 
which manages coding the branch address); sub_set = -1 (the branch 
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address function needs no subdivision); and choice = ’’the pointer to the 
first digit of the branch address entered.” The branch address’ 
corresponding docu-field status is checked; if it is not zero, the user is 
again prompted to confirm the change. If the branch address docu-field 
is zero, or confirmation to change the branch address is received, then 
the address requested is placed (in binary) in the microword. 

The branch address case (number 19) of Field_set also checks 
the status of the docu-field function for register A and B selection. 
This is done because the two functions; selecting the branch address 
and selecting the A and B registers, share the bits from 36 to 43. The 
compatibility algorithm is used to find a compatible bit pattern if 
possible. 

After the branch address is selected the menu for selecting the 
desired conditional test is written to the screen. The user’s options are 
to select a forced pass, forced fail or to go to another menu to select 
the exact test desired. Field_set is called with field_cnt = 25 for the 
conditional testing case of Field_set's SWITCH; sub^set = 1, 2, 3 or 4; 
choice = ’’pointer to the choice for the particular test desired.” The 
sub_set code is assigned according to which fields need to be set for 
the conditional tests function. All the different conditional tests are set 
using four different groups of physical fields. The value 1 means that 
the Command Enable field (bit 26) is set; 2 means that the Command 
Enable field and the Command field (bits 28-31) are set; 3 and 4 mean 
that the fields at bit positions 26,28,18,20 are all set. 

First the conditional tests function docu-field is checked; if it is 
not zero then the appropriate physical fields are erased (according to 
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the paragraph above) depending on the value in the present docu-field. 
The docu-field is reset with the code corresponding to the class of 
conditional test newly requested, and the microword is set. The 
resulting microword for the "conditional jump via register/pipeline" with 
requested branch address and conditional test is displayed, and the 
main menu is again written to the screen. The following is an edited 
version of the sequence of events as seen on the monitor screen when 
the above example is run using the microcode generator. Appendix A is 
an unedited record of a sample session using the code generator. 



MASTER AM2910 SEQUENCER MENU 

What do you want to do next? 

Enter a 0 to select SEQUENCER COMMAND 
H for HELP with this program 
R to RETURN to system 



AM2910 SEQUENCER COMMAND MENU 
Which AM2910 Sequencer Command do you wish to Chose? 

Enter a 0 JUMP ZERO - JZ 

1 CONDITIONAL JUMP SUBROUTINE - CJS 

2 JUMP MAP - JMAP 



7 CONDITIONAL JUMP VIA REGISTER OR PIPELINE 



F THREE WAY BRANCH - TWB 
H HELP with this program 
R RETURN to higher level 



Docu-wor d : 

000000000000000000000004 



Microword : 

XXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXX XXXXXXXXXXXX0111 
ffff ffff f f f 7 
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AM2910 SEQUENCER BRANCH ADDRESS MENU 



You have chosen a command which requires a value in the 
register/counter 

ENTER YOUR BRANCH ADDRESS FIELD 

H for HELP with this program 
R to RETURN to a higher level 

222 

This is the address being used. 222 
Docu-wor d : 

000000000000000000-100004 
Microword : 

XXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXX XX10001000100111 
ffff ffff e227 



AM2910 SEQUENCER CONDITION SELECT MENU 

You have chosen an AM2910 Sequencer Command which requires a 
conditional test 



What do you want to do next? 



f 



Type a P 
F 
T 
H 
R 



for FORCED PASS - unconditional 

for FORCED FAIL 

to TEST the condition 

for HELP with this program 

to RETURN to higher level 



Docu-wor d : 

000000020 



000000000-100004 



Microword : 

XXXXXXXXXXXXXXXX XXXXXXXXXX0X1000 XXIOOOIOOOIOO'1 1 1 
ffff ffd8 e227 



C. UTILITIES 

The Utilities module contains many support procedures. The pro- 
cedures binary_field, dual_field, octal_field and hex_field convert a 
selected function to the needed bit pattern in respective binary, dual, 
octal and hex sized fields. This is done using a SWITCH statement as a 
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lookup table. For example, the user selects choice *8' from a menu 
which is to be set in a four bit field; the procedure hex_field is called. 
Hex_field is passed the starting bit and calls the procedures bit_set and 
bit_clear to set the bit pattern 1000. 

The housekeeping utilities will manage such functions as list, save 
routines, scan, modify and print microroutines. These utilities can be 
called from both the ALU and Sequencer modules. 

D. HEADER FILES 

The use of header files in C language programs increases flexibility 



and organization in the management 


of program 


segments. 


The 


microcode 


generator program 


uses two 


header files 


to centralize 


the 


definition 


of constants and 


externals. 


Declare. h 


contains all 


the 



constants defined using the #define preprocessor feature. Extern. h 
contains all the variables and pointers externally defined. The Declare. h 
file is "#included” with each module. The Extern. h file is included with 
all but the main module. 

E. RUNNING THE CODE GENERATOR 

As stated before, this tool is intended for the experienced micro- 
programmer. The microprogramming techniques and structures for the 
Am29203 Evaluation Board are contained in Reference 6, the Am29203 
Evaluation Board User's Guide, and Reference 14, AMD's Data Book. The 
program's help messages, where implemented, are derived from these two 
references. 
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1. Main Menu 

From the user's point of view, this program is very easy to use. 
After executing the program, the sequencer module, the ALU module, or 
housekeeping functions like scan or print microroutines can be selected. 
Also, the Help and "Return to System/Higher Level" options are available 
as in nearly every menu in the program. Selecting Help in each menu 
will cause an informational message to be written to the screen, then the 
same menu is presented again. The "Return" function causes the user 
to go back to the previous menu. 

2. Sequencer 

In the sequencer portion of the program, the Sequencer 
Command Menu (fig. 4.1) is presented. This menu displays the 
sequencer codes used by the Am2910 Sequencer chips on the Evaluation 
Board. As discussed above, the sequencer codes are grouped in four 
classes. The JZ, JMAP, RPCT and CONT codes do not use branches or 
conditional testing, so only the sequencer code bits are set in the 
microword. The LDCT command requires an entry in the branch 
address field so the Branch Address Menu is then displayed and the 
user enters the desired values for the address. The maximum address 
that can be coded is 3FF hex. If a higher value is entered the user 
will see an error message and the menu is presented again. The CJV, 
Conditional Return from Subroutine, and LOOP commands require that 
conditional tests be set up. A menu called the Condition Select Menu is 
displayed and prompts the user through several levels of menus until 
the desired conditional test is set. The CJS, CJP, PUSH, JSRP, Con- 
ditional Jump Via Register or Pipeline, Conditional Jump Pipeline and 
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POP, and the TWB commands all require both branch addresses and con- 
ditional tests. The two sets of menus are displayed and the user is 
prompted for all selections as before. 



AM2910 SEQUENCER COMMAND MENU 



Which AM2910 Sequencer Command do you wish to chose? 



Enter a 



0 JUMP ZERO - JZ 

1 CONDITIONAL JUMP SUBROUTINE - CJS 

2 JUMP MAP - JMAP 

3 CONDITIONAL JUMP PIPELINE - CJP 

4 PUSH/CONDITIONAL LOAD REG I S TER/ P IPE L INE - PUSH 

5 COND. JUMP SUB. VIA REG OR PIPELINE - JSRP 

6 CONDITIONAL JUMP VECTOR - CJV 

7 CONDITIONAL JUMP VIA REGISTER OR PIPELINE 

8 REPEAT LOOP, COUNTER NOT EQUAL 0 - RFCT 

9 REPEAT PIPELINE, COUNTER NOT EQUAL 0 - RPCT 
A CONDITIONAL RETURN FROM SUBROUTINE 

B CONDITIONAL JUMP PIPELINE AND POP 
C LOAD COUNTER AND CONTINUE - LDCT 
D TEST FOR END OF LOOP - LOOP 
E CONTINUE - CONT 
F THREE WAY BRANCH - TWB 
H HELP with this program 
R RETURN to higher level 



Fig. 4.1 Sequencer Command Menu 



3. ALU 

The ALU module of the microcode generator, although not fully 



implemented, will be used in the same fashion as the sequencer portion. 



The user selects ALU Basic Functions (fig. 4.2) or ALU Special Functions 
(fig. 4.3) from the main menu. The user is then prompted through 



several different levels of menus. He provides input such as the 
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ALU BASIC FUNCTION MENU 



Enter the value corresponding to the function you wish to 
perforin : 

0 F = High 

1 F=S— R-1+ Carry In 

2 F=R-S-1+ Carry In 

3 R + S + Carry In 

4 S + Carry In 

5 (NOT S) + Carry In 

6 R + Carry In 

7 F = (NOT R) + Carry In 

8 F = Low 

9 F = (NOT R) AND S 

A F = R EXCLUSIVE OR S 
B F = R EXCLUSIVE OR S 
C F = R AND S 
D F = R NOR S 
E F = R NAND S 
F F = R OR S 

H for HELP with this program 
R to RETURN to higher level 



Fig 4.2 ALU Basic Function Menu 
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ALU SPECIAL FUNCTION MENU 



Enter the value corresponding to the function you wish to 
per f orra : 

0 Unsigned multiply 

1 BCD to Binary Conversion 

M Multiprecision BCD to Binary Conversion 

2 Two’s Complement Multiply 

3 Decrement by 1 or 2 

4 Increment by 1 or 2 

5 Sign/Magnitude to Two’s Complement Conversion 

6 Two’s Complement Multiply 

7 BCD Divide by 2 

8 Single Length Normalize 

9 Binary to BCD Conversion 

Z Multiprecision Binary to BCD Conversion 
A Double Length Normalize; First Division 
B BCD Add 

C Two’s Complement Divide 

D BCD Subtract F=R-S-1+ Carry In BCD 
E Two’s Complement Divide Correction and Remainder 
F BCD Subtract F=S-R-1+ Carry In BCD 
H for HELP with this menu 
R to RETURN to higher level 



Fig. 4.3 ALU Special Function Menu 
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sources for ALU operations, the destinations for the ALU results, and 
the selection of registers for the ALU. 

F. ALU IMPLEMENTATION DIFFICULTIES 

The ALU module presents some difficult implementation problems 
since it involves more potential conflicts in the microword bit fields than 
does the sequencer module. The ALU functions which involve shifting 
and carry-in bits pose particular problems since they share bits with 
the conditional testing fields and the command field. Another hot spot 
in the microword is the sharing of the branch address fields and the 
register A and register B fields. 

Compatibility is possible, in some cases, between functions which 
share fields since many of the shifting functions are satisfied with 
several alternate bit patterns (some have up to seven possible patterns). 
However, the program must be "smart” enough to determine when the 
conflicts occur and warn the user. This problem is the most difficult to 
solve in the implementation of the microcode generator. To optimize 
microprograms the programmer has to take every opportunity to code as 
many functions in each microword as possible. If he codes only one 
function per microword there would not be enough room in Control Store 
for all his routines. This task is the most complex and time consuming 
part of microprogramming. So, although the ALU implementation is not 
complete, the solution, in the form of a sample algorithm, is provided for 
the problem of automating the process of optimizing microroutines 
(Appendix C). This algorithm searches through C language STRUCTURES 
[Ref. 10: p. 119-141] that are set-up to store all the possible bit 
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patterns. It compares the requested function’s bit pattern against the 
STRUCTURE, and then chooses a compatible pattern. Appendix C 
contains the source code of the test program which demonstrates this. 
This algorithm needs to be incorporated into Field_set , s cases which 
incorporate the ALU functions. When there is a conflict, Field_set needs 
to read the microword’s ’’history’’ by checking the docu-word and then 
make the compatibility check. If a compatible pattern is found, the 
microword is set, the docu-word is coded to reflect the new function 
added to the word, plus an indication is needed of the possible conflict. 
This is necessary in case the user wants to further modify the 
microword. 

G. SUMMARY 

The microcode generator’s program modules and function imple- 
mentations have been described detailing the data structures used and 
the support utilities and files provided. To show how easy the program 
is to use a guide to running the program was provided. The next 
chapter will discuss some conclusions and recommendations derived from 
this project. 
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V. CONCLUSIONS AND RECOMMENDATIONS 
A. CONCLUSIONS 

The microcode generator is a needed tool for the microprogrammer 
and/or computer designer. The coding of microwords at the level of the 
machine's hardware involves detailed manipulation of the micro- 
programmed control unit's control lines, registers and functional units. 
The microword fields' complexity is directly correlated to the number of 
parallel functions that the microword can invoke. As detailed in chapter 
four, there are several shared bit fields in the microword used in the 
microcode generator. The program's ability to manage function conflicts 
in a ’’user-friendly" manner relieves the user of the "overhead" of 
tracking the potential conflicts as he designs his routines. The solution 
of this function conflict problem is demonstrated in the sample program 
provided in Appendix C. This compatibility algorithm compares the bit 
pattern of the requested function to a C STRUCTURE holding the 
possible bit patterns of a conflicting, previously selected function. If it 
exists, a compatible bit pattern is found and placed in the proper 
position in the microword. The microcode generator also prevents the 
user from making simple mistakes such as writing a f l' instead of a ? 0'. 
The program "writes" the proper digit once the user chooses the 
function desired. 

The choice of C for the programming language in which to write the 
code generator was perfect for the application. The VAX 780/Unix 

system was predetermined in that it was convenient, accessible and the 
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most powerful system in the department. The C language is an integral 
part of that system. C is difficult to learn because it is intended as a 
production language, not an educational tool. It's error messages are 
not very specific (eg. BUS ERROR - CORE DUMPED). It is, being a 
systems language, very flexible. There are few constructs to learn 
since everything is done with functions. The standard C function 
library provides all I/O functions since there are none in the language 
itself. The housekeeping functions which require using system calls to 
open/close files should be easier to implement in C. The Unix operating 
system is mostly written in C, so the two environments, C and Unix, are 
highly compatible. 

The microcode generator design is approximately 75 percent opera- 
tional. The Sequencer portion, most utilities and an elementary version 
of the ALU is completed. Initial testing on the Sequencer is complete. 
The program needs to be used in a design environment to find further 
bugs in either concept or implementation. Algorithms have been tested 
successfully which solve the shared field problems in the ALU. The 
function compatibility solution test program is shown in Appendix C. 

I am satisfied that the decision to use the menu-driven method was 
the best way to implement the code generator. As discussed in the 
implementation chapter, the equivalent number of commands needed 
would be too great to use the command-driven method. The menus do 
become very familiar after prolonged use of the program. The slight 
impatience felt is a small price for the program’s simplicity of execution. 
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B. WHAT'S NEXT 



The obvious next step is to finish the implementation of the ALU 
and fill in the ALU portions of the Docu and Field_set utilities. The 
housekeeping functions also need implementation. As discussed pre- 
viously, the compatibility test program will solve the function conflict 
problem. The housekeeping utilities can be completed by writing the 
routines to open files, and then using system calls to save and print 
the routines with user defined names. 

A next step could be to adapt the program to run on a workstation 
used for computer design. Some research is needed to select an appro- 
priate workstation. Some attributes should be: that it runs Unix 

(initially) and that it is readily accessible to students. A move to 
another Unix system would facilitate benchmarking between the VAX and 
the new system. Adapting the code generator to systems with different 
input devices is essential to studying the man/machine interface aspects 
of this project. As mentioned above, one drawback to the menu-driven 
method of interaction is that the experienced user of the program can 
become impatient as familiarity with the menus increases. The use of a 
mouse, for example, as an alternative input device might improve this 
situation. The mouse also presents the possibility of using more 
creative graphics to enhance the use of menus. For example, sensitive 
selection areas could be provided on the screen for the execution of 
frequently selected functions such as ’’display the microword”, ’’erase a 
string of bits in the microword,” etc. Individuals have different ideas 
of what the ideal method of communication with computers is; designers 
have to try to deal with all, or at least most computer users. 
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The ultimate goal in the level of complexity for this microcode 
generator is to be independent of the target machine. This project was 
targeted for a specific machine and so has not yet reached the ultimate 
goal. After this implementation is completed the next step is to write 
the program to handle some area of generalization. The user should 
enter certain constants concerning his machine either at the beginning 
or during each coding session. In the context of the C language, 
header files for many specific machines could be developed. The user 
obtains only the header files he needs. A configuration program may 
need to be developed so that the basic program could be configured by 
the user at one initial session. There are an infinite number of 

approaches to take in the continued development and maintenance of the 
code generator. In any case, the non-specific microcode generator 
would be an invaluable tool for a designer working with the development 
of microprogrammed instruction sets. 

C. SUMMARY 

The general topic of microprogramming was discussed in terms of 
the microprogrammed control unit. Software Engineering theory and 
practice was outlined in chapter three. The design approach used in 
this project was developed using these principles. Chapter four 
discussed significant points as addressed in the implementation of the C 
language program. An important point is that vertical microprogramming 
techniques, the sharing of function fields in the microword, give rise to 
potential conflicts between the bit patterns required for the conflicting 
functions. This is one of many tedious tasks for the microprogrammer. 
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This thesis has addressed the problem of automating the process of 



functional microprogramming and provided some solutions to 
approach and implementation of a microcode generator. 



the 
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APPENDIX A 



The following is a record of a terminal session running the Sequencer 
module. 



% test3 

MASTER AM2910 SEQUENCER MENU 



xxxxxxxxxxxxxxxx 


XXXXXXXXXXXXXXXX 


XXXXXXXXXXXXXXXX 




ffff 


ffff 


ffff 


The 


X s indicate 


bits which are not 


yet defined . 


What 


do you want 


to do next? 






Enter a 0 


to select SEQUENCER 


COMMAND 




H 


for HELP with this 


program 




R 


to RETURN to system 
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AM2910 SEQUENCER COMMAND MENU 



Which AM2910 Sequencer Command do you wish to Chose? 



Enter a 0 
1 
2 

3 

4 

5 

6 

7 

8 
9 
A 
B 
C 
D 
E 
F 
H 
R 

0 



JUMP ZERO - JZ 
CONDITIONAL JUMP 
JUMP MAP - JMAP 
CONDITIONAL JUMP 
PUSH/CONDITIONAL 
CONDITIONAL JUMP 
CONDITIONAL JUMP 
CONDITIONAL JUMP 
REPEAT LOOP, COUNTER NOT EQUAL 0 - 
REPEAT PIPELINE, COUNTER NOT EQUAL 
CONDITIONAL RETURN FROM SUBROUTINE 
CONDITIONAL JUMP PIPELINE AND POP 
LOAD COUNTER AND CONTINUE - LDCT 
TEST FOR END OF LOOP - LOOP 
CONTINUE - CONT 
THREE WAY BRANCH - TWB 
HELP with this program 
RETURN to higher level 



SUBROUTINE - CJS 
PIPELINE - CJP 

LOAD REGISTER/PIPELINE - PUSH 
SUB. VIA REG OR PIPELINE - JSRP 
VECTOR - CJV 

VIA REGISTER OR PIPELINE 

RFCT 

0 - RPC T 
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MASTER AM2910 SEQUENCER MENU 



XXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXX 



f ff f 



f fff 



xxxxxxxxxxxxoooo 

f ffO 



0 



The X s 



indicate bits which are not yet 



defined . 



What 



do you want 
Enter a 0 
H 
R 



to do next? 

to select SEQUENCER COMMAND 
for HELP with this program 
to RETURN to system 
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AM2910 SEQUENCER COMMAND MENU 



Which AM2910 Sequencer Command do you wish to Chose? 



Enter a 0 JUMP ZERO - JZ 

1 CONDITIONAL JUMP 

2 JUMP MAP - JMAP 

3 CONDITIONAL JUMP 

4 PUSH/CONDITIONAL 

5 CONDITIONAL JUMP 

6 CONDITIONAL JUMP 

7 CONDITIONAL JUMP 

8 REPEAT LOOP, COUNTER NOT EQUAL 0 - 

9 REPEAT PIPELINE, COUNTER NOT EQUAL 
A CONDITIONAL RETURN FROM SUBROUTINE 
B CONDITIONAL JUMP PIPELINE AND POP 
C LOAD COUNTER AND CONTINUE - LDCT 

D TEST FOR END OF LOOP - LOOP 
E CONTINUE - CONT 
F THREE WAY BRANCH - TWB 
H HELP with this program 
R RETURN to higher level 



SUBROUTINE - CJS 
PIPELINE - CJP 

LOAD REGISTER/PIPELINE - PUSH 
SUB. VIA REG OR PIPELINE - JSRP 
VECTOR - CJV 

VIA REGISTER OR PIPELINE 

RFCT 

0 - RPCT 



The sequencer code is already 
Do you want to change it? 

y 



set 
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AM2910 SEQUENCER BRANCH ADDRESS MENU 



You have chosen a command which requires a value in the 
register/counter 

What do you want to do next? 

ENTER YOUR BRANCH ADDRESS FIELD 

H for HELP with this program 
R to RETURN to a higher level 

123 

This is the address being used. 123 
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AM2910 SEQUENCER CONDITION SELECT MENU 



You have chosen an AM 2910 Sequencer Command which requires a 
conditional test 



What do you want to do next? 



f 



Type a P 
F 
T 
H 
R 



for FORCED PASS - unconditional 

for FORCED FAIL 

to TEST the condition 

for HELP with this program 

to RETURN to higher level 
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REMINDER INFORMATION 



You have chosen a PUSH/CONDITIONAL LOAD REGISTER/COUNTER 
PUSH 

as the AM2910 Sequencer Command 

This command MUST precede the following commands: 

RFCT REPEAT LOOP, COUNTER NOT EQUAL 0 
CJPP CONDITIONAL JUMP PIPELINE AND POP 
LOOP TEST FOR END OF LOOP 
TWB THREE WAY BRANCH 



Press enter to continue 
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MASTER 

xxxxxxxxxxxxxxxx 

ffff 

The X s indicate 

What do you want 
Enter a 0 
H 
R 

0 



AM2910 SEQUENCER MENU 

XXXXXXXXXX0X1000 XXO 1001000110100 
ffd8 d234 

bits which are not yet defined. 

to do next? 

to select SEQUENCER COMMAND 
for HELP with this program 
to RETURN to system 
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AM2910 SEQUENCER COMMAND MENU 



Which AM 2910 Sequencer C oramand do you wish to Chose? 



Enter a 



0 

1 

2 

3 

4 

5 

6 

7 

8 
9 
A 
B 
C 
D 
E 
F 
H 
R 



JUMP ZERO - JZ 
CONDITIONAL JUMP 
JUMP MAP - JMAP 
CONDITIONAL JUMP 
PUSH/CONDITIONAL 
CONDITIONAL JUMP 
CONDITIONAL JUMP 
CONDITIONAL JUMP 



SUBROUTINE - CJS 
PIPELINE - CJP 

LOAD REGISTER/PIPELINE - PUSH 
SUB. VIA REG OR PIPELINE - JSRP 
VECTOR - CJV 

VIA REGISTER OR PIPELINE 

RFC T 

0 - RPC T 



REPEAT LOOP, COUNTER NOT EQUAL 0 - 
REPEAT PIPELINE, COUNTER NOT EQUAL 
CONDITIONAL RETURN FROM SUBROUTINE 
CONDITIONAL JUMP PIPELINE AND POP 
LOAD COUNTER AND CONTINUE - LDCT 
TEST FOR END OF LOOP - LOOP 
CONTINUE - CONT 
THREE WAY BRANCH - TWB 
HELP with this program 
RETURN to higher level 



The sequencer code is already 
Do you want to change it? 

y 



set 
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REMINDER INFORMATION 



You have chosen one of the following AM2910 Sequencer 



C omman ds : 




JRP 
RPC T 


JUMP REGISTER OR PIPELINE 

REPEAT PIPELINE, COUNTER NOT EQUAL 0 


These commands 
LDCT 


MUST be preceded by a 
- LOAD COUNTER AND CONTINUE 



Press enter to 


con t inue 
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MASTER 

XXXXXXXXXXXXXXXX 
f f f f 

The X s indicate 

What do you want 
Enter a 0 
H 
R 

0 



AM2910 SEQUENCER MENU 

XXXXXXXXXXXXXXXX XXXXXXXXXXXX1001 
ffff f f f 9 

bits which are not yet defined. 

to do next? 

to select SEQUENCER COMMAND 
for HELP with this program 
to RETURN to system 
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AM2910 SEQUENCER COMMAND MENU 



Which AM2910 Sequencer Command do you wish to Chose? 



Enter a 0 
1 
2 

3 

4 

5 

6 

7 

8 
9 
A 
B 
C 
D 
E 
F 
H 
R 

c 

The sequence 
Do you want 

y 



JUMP ZERO - JZ 
CONDITIONAL JUMP 
JUMP MAP - JMAP 
CONDITIONAL JUMP 
PUSH/CONDITIONAL 
CONDITIONAL JUMP 
CONDITIONAL JUMP 
CONDITIONAL JUMP 
REPEAT LOOP, COUNTER NOT EQUAL 0 - 
REPEAT PIPELINE, COUNTER NOT EQUAL 
CONDITIONAL RETURN FROM SUBROUTINE 
CONDITIONAL JUMP PIPELINE AND POP 
LOAD COUNTER AND CONTINUE - LDCT 
TEST FOR END OF LOOP - LOOP 
CONTINUE - CONT 
THREE WAY BRANCH - TWB 
HELP with this program 
RETURN to higher level 



SUBROUTINE - CJS 
PIPELINE - CJP 

LOAD REGISTER/PIPELINE - PUSH 
SUB. VIA REG OR PIPELINE - JSRP 
VECTOR - CJV 

VIA REGISTER OR PIPELINE 

RFCT 

0 - RPC T 



r code is already set. 
to change it? 
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AM2910 SEQUENCER BRANCH ADDRESS MENU 



You have chosen a command which requires a value in the 
register/counter 

What do you want to do next? 

ENTER YOUR BRANCH ADDRESS FIELD 

H for HELP with this program 
R to RETURN to a higher level 

223 

This is the address being used. 223 
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REMINDER INFORMATION 



You have chosen a LOAD COUNTER AND CONTINUE -LDCT- as the 
AM2910 Sequencer Command 

This command MUST precede the following: 

JRP CONDITIONAL JUMP REGISTER OR PIPELINE 
RPCT REPEAT PIPELINE, COUNTER NOT EQUAL 0 



Press enter 



to continue 
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MASTER AM2910 SEQUENCER MENU 



XXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXX XXIOOOlOOOllllOO 
ffff ffff e23c 



0 



The X s indicate bits which are not yet defined. 



What do you want to do next? 



Enter a 0 
H 
R 



to select SEQUENCER COMMAND 
for HELP with this program 
to RETURN to system 
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AM2910 SEQUENCER COMMAND MENU 



Which AM 2 9 1 0 Sequencer C ommand do you wish to Chose? 



Enter a 0 
1 
2 

3 

4 

5 

6 

7 

8 
9 
A 
B 
C 
D 
E 
F 
H 
R 

a 

The sequence 
Do you want 

y 



JUMP ZERO - JZ 
CONDITIONAL JUMP 
JUMP MAP - JMAP 
CONDITIONAL JUMP 
PUSH/CONDITIONAL 
CONDITIONAL JUMP 
CONDITIONAL JUMP 
CONDITIONAL JUMP 
REPEAT LOOP, COUNTER NOT EQUAL 0 - 
REPEAT PIPELINE, COUNTER NOT EQUAL 
CONDITIONAL RETURN FROM SUBROUTINE 
CONDITIONAL JUMP PIPELINE AND POP 
LOAD COUNTER AND CONTINUE - LDCT 
TEST FOR END OF LOOP - LOOP 
CONTINUE - CONT 
THREE WAY BRANCH - TWB 
HELP with this program 
RETURN to higher level 



SUBROUTINE - CJS 
PIPELINE - CJP 

LOAD REGISTER/PIPELINE - PUSH 
SUB. VIA REG OR PIPELINE - JSRP 
VECTOR - CJV 

VIA REGISTER OR PIPELINE 

RFCT 

0 - RPCT 



r code is already set. 
to change it? 
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AM2910 SEQUENCER CONDITION SELECT MENU 



You have chosen an AM2910 Sequencer Command which requires a 
conditional test 



What do you want to do next? 



P 



Type a P 
F 
T 
H 
R 



for FORCED PASS - unconditional 

for FORCED FAIL 

to TEST the condition 

for HELP with this program 

to RETURN to higher level 
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MASTER AM2910 SEQUENCER MENU 



XXXXXXXXXXXXXXXX 
ff ff 

The X s indicate 

What do you want 
Enter a 0 
H 
R 

0 



XXXXXXXXXX1XXXXX XXXXXXXXXXXX1010 
ffff fffa 

bits which are not yet defined. 

to do next? 

to select SEQUENCER COMMAND 
for HELP with this program 
to RETURN to system 
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AM2910 SEQUENCER COMMAND MENU 



Which AM2910 Sequencer Command do you wish to Chose? 



Enter a 



0 

1 

2 

3 

4 

5 

6 

7 

8 
9 
A 
B 
C 
D 
E 
F 
H 
R 



JUMP ZERO - JZ 
CONDITIONAL JUMP 
JUMP MAP - JMAP 
CONDITIONAL JUMP 
PUSH/CONDITIONAL 
CONDITIONAL JUMP 
CONDITIONAL JUMP 
CONDITIONAL JUMP 



SUBROUTINE 



CJS 



PIPELINE - CJP 

LOAD REGISTER/PIPELINE - PUSH 
SUB. VIA REG OR PIPELINE - JSRP 
VECTOR - CJV 

VIA REGISTER OR PIPELINE 



REPEAT LOOP, COUNTER NOT EQUAL 0 - 
REPEAT PIPELINE, COUNTER NOT EQUAL 
CONDITIONAL RETURN FROM SUBROUTINE 
CONDITIONAL JUMP PIPELINE AND POP 
LOAD COUNTER AND CONTINUE - LDCT 
TEST FOR END OF LOOP - LOOP 
CONTINUE - CONT 
THREE WAY BRANCH - TWB 
HELP with this program 
RETURN to higher level 



RFCT 

0 - RPCT 



The sequencer code is already 
Do you want to change it? 

y 



set 
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AM 2 9 1 0 SEQUENCER CONDITION SELECT MENU 



You have chosen an AM2910 Sequencer Command which requires a 
conditional test 



What do you want to do next? 



t 



Type a P 
F 
T 
H 
R 



for FORCED PASS - unconditional 

for FORCED FAIL 

to TEST the condition 

for HELP with this program 

to RETURN to higher level 
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AM2904 CONDITIONAL TEST MENU 



0 



There are two steps to selecting a test condition 

1) select a REGISTER to be used 

2) select a TEST on that register 

This menu selects the register ot two special tests 
which combine two registers 



What do you want to do? 



Type a 0 
1 
2 

3 

4 
H 
R 



for the Micro status register 
for the MACRO Status Register 
for the Immediate Status Inputs 
for Immediate Sign EXOR MACRO Sign 
for Immediate Sign EXNOR MARCO Sign 
for HELP with this menu 
to RETURN to a higher level 



81 



AM2904 CONDITIONAL TEST MENU 



What 


condition 


do you want reflected by the condition? 


Type 


a 0 


for 


(SIGN exor OVR) or ZERO 




1 


for 


(SIGN exnor OVR) and not ZERO 




2 


for 


(SIGN exor OVR) 




3 


for 


(SIGN exnor OVR) 




4 


for 


ZERO 




5 


for 


not ZERO 




6 


for 


OVR 




7 


for 


not OVR 




8 


for 


(CARRY or ZERO) 




9 


for 


(not CARRY) or (not ZERO) 




A 


for 


CARRY 




B 


for 


not CARRY 




C 


for 


(not CARRY or ZERO) 




D 


for 


(CARRY or not ZERO) 




E 


for 


SIGN 




F 


f or 


not SIGN 




H 


for 


HELP with this menu 



R to RETURN to a higher level 
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REMINDER INFORMATION 



You have chosen one of the following 2910 Sequencer Commands 



RFCT 

CJPP 

LOOP 

TWB 


REPEAT LOOP, COUNTER NOT EQUAL 0 
CONDITIONAL JUMP PIPELINE AND POP 
TEST FOR END OF LOOP 
THREE WAY BRANCH 


These commands 


MUST be preceded by a 


PUSH 


- PUSH/CONDITIONAL LOAD REGISTER/COUNTER 



Press enter to 


con t inue 
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MASTER AM2910 SEQUENCER MENU 



XXXXXXXXXXXXXXXX 
fff f 



XX0X0101XX0X1001 

d5d9 



XXXXXXXXXXXX1101 
f ffd 



0 



The 


X s 


indicat 


What 


do 


you wan 




Enter a 0 



H 

R 



bits which are not yet defined, 
to do next? 

to select SEQUENCER COMMAND 
for HELP with this program 
to RETURN to system 
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AM2910 SEQUENCER COMMAND MENU 



Which AM2910 Sequencer Command do you wish to Chose? 



Enter a 0 JUMP ZERO - JZ 

1 CONDITIONAL JUMP 

2 JUMP MAP - JMAP 

3 CONDITIONAL JUMP 

4 PUSH/CONDITIONAL 

5 CONDITIONAL JUMP 

6 CONDITIONAL JUMP 

7 CONDITIONAL JUMP 

8 REPEAT LOOP, COUNTER NOT EQUAL 0 - 

9 REPEAT PIPELINE, COUNTER NOT EQUAL 
A CONDITIONAL RETURN FROM SUBROUTINE 
B CONDITIONAL JUMP PIPELINE AND POP 
C LOAD COUNTER AND CONTINUE - LDCT 

D TEST FOR END OF LOOP - LOOP 
E CONTINUE - CONT 
F THREE WAY BRANCH - TWB 
H HELP with this program 
R RETURN to higher level 



SUBROUTINE - CJS 
PIPELINE - CJP 

LOAD REGISTER/PIPELINE - PUSH 
SUB. VIA REG OR PIPELINE - JSRP 
VECTOR - CJV 

VIA REGISTER OR PIPELINE 

RFCT 

0 - RPCT 



The sequencer code is already 
Do you want to change it? 



set 



y 
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AM2910 SEQUENCER BRANCH ADDRESS MENU 



You have chosen a command which requires a value in the 
register/counter 

What do you want to do next? 

ENTER YOUR BRANCH ADDRESS FIELD 

H for HELP with this program 
R to RETURN to a higher level 

fff 

This is the address being used. fff 
Invalid input, the max hex number is 3FF. 

Press enter to continue 
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AM2910 SEQUENCER BRANCH ADDRESS MENU 



You have chosen a command which requires a value in the 
register /counter 

What do you want to do next? 

ENTER YOUR BRANCH ADDRESS FIELD 

H for HELP with this program 
R to RETURN to a higher level 

333 

This is the address being used. 333 
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AM 2 9 1 0 SEQUENCER CONDITION SELECT MENU 



You have chosen an AM2910 Sequencer Command which requires 
conditional test 



What do you want to do next? 



Type a 



P for FORCED PASS - unconditional 
F for FORCED FAIL 
T to TEST the condition 
H for HELP with this program 
R to RETURN to higher level 



t 



AM2904 CONDITIONAL TEST MENU 



4 



There are two steps to selecting a test condition 

1) select a REGISTER to be used 

2) select a TEST on that register 

This menu selects the register ot two special tests 
which combine two registers 



What do you want to do? 



Type a 0 
1 
2 

3 

4 
H 
R 



for the Micro status register 
for the MACRO Status Register 
for the Immediate Status Inputs 
for Immediate Sign EXOR MACRO Sign 
for Immediate Sign EXNOR MARCO Sign 
for HELP with this menu 
to RETURN to a higher level 
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REMINDER INFORMATION 



You have chosen one of the following AM2910 Sequencer 
Commands : 



JRP JUMP REGISTER OR PIPELINE 

RPCT REPEAT PIPELINE, COUNTER NOT EQUAL 0 



These commands MUST be preceded by a 

LDCT - LOAD COUNTER AND CONTINUE 



Press enter 



to continue 



90 



MASTER AM 2 9 1 0 SEQUENCER MENU 



XXXXXXXXXXXXXXXX XX001111XX0X1001 XX 11001100110111 
ffff cfd9 f 337 

The X s indicate bits which are not yet defined. 

What do you want to do next? 

Enter a 0 to select SEQUENCER COMMAND 
H for HELP with this program 
R to RETURN to system 
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AM2910 SEQUENCER COMMAND MENU 



Which AM2910 Sequencer Command do you wish to Chose? 



Enter a 0 
1 
2 

3 

4 

5 

6 

7 

8 
9 
A 
B 
C 
D 
E 
F 
H 
R 

f 

The sequenc 
Do you want 

y 



JUMP ZERO - JZ 
CONDITIONAL JUMP 
JUMP MAP - JMAP 
CONDITIONAL JUMP 
PUSH/CONDITIONAL 
CONDITIONAL JUMP 
CONDITIONAL JUMP 
CONDITIONAL JUMP 
REPEAT 
REPEAT 



SUBROUTINE - CJS 



PIPELINE - CJP 
LOAD REGISTER/PIPE 
SUB. VIA REG OR PI 
VECTOR - CJV 
VIA REGISTER OR PI 
LOOP, COUNTER NOT EQUAL 0 - 
PIPELINE, COUNTER NOT EQUAL 



CONDITIONAL RETURN FROM SUBROUTINE 
CONDITIONAL JUMP PIPELINE AND POP 
LOAD COUNTER AND CONTINUE - LDCT 
TEST FOR END OF LOOP - LOOP 
CONTINUE - CONT 
THREE WAY BRANCH - TWB 
HELP with this program 
RETURN to higher level 



LINE - PUSH 
PELINE - JSRP 

PELINE 

RFCT 

0 - RPCT 



er code is already set. 
to change it? 
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AM2910 SEQUENCER BRANCH ADDRESS MENU 



You have chosen a command which requires a value in the 
register/counter 

What do you want to do next? 

ENTER YOUR BRANCH ADDRESS FIELD 

H for HELP with this program 
R to RETURN to a higher level 

211 

This is the address being used. 211 
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AM 2 9 1 0 SEQUENCER CONDITION SELECT MENU 



You have chosen an AM2910 Sequencer Command which requires a 
conditional test 

What do you want to do next? 

Type a P for FORCED PASS - unconditional 
F for FORCED FAIL 
T to TEST the condition 
H for HELP with this program 
R to RETURN to higher level 
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AM2904 CONDITIONAL TEST MENU 



There are two steps to selecting a test condition 
1} select a REGISTER to be used 
2) select a TEST on that register 

This menu selects the register ot two special tests 
which combine two registers 

What do you want to do? 

Type a 0 for the Micro status register 

1 for the MACRO Status Register 

2 for the Immediate Status Inputs 

3 for Immediate Sign EXOR MACRO Sign 

4 for Immediate Sign EXNOR MARCO Sign 
H for HELP with this menu 

R to RETURN to a higher level 
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AM2904 CONDITIONAL TEST MENU 



f 



What 


condi t 


ion 


do you want reflected by 


Type 


a 0 


for 


(SIGN exor OVR) or ZERO 




1 


for 


(SIGN exnor OVR) and not 




2 


for 


(SIGN exor OVR) 




3 


for 


(SIGN exnor OVR) 




4 


for 


ZERO 




5 


for 


not ZERO 




6 


for 


OVR 




7 


for 


not OVR 




8 


for 


(CARRY or ZERO) 




9 


for 


(not CARRY) or (not ZERO) 




A 


for 


CARRY 




B 


for 


not CARRY 




C 


for 


(not CARRY or ZERO) 




D 


for 


(CARRY or not ZERO) 




E 


for 


SIGN 




F 


for 


not SIGN 




H 


for 


HELP with this menu 



R to RETURN to a higher level 



the condition? 



ZERO 
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REMINDER INFORMATION 



You have chosen 

RFCT 

CJPP 

LOOP 

TWB 

These commands 
PUSH 



Press enter to 



one of the following 2910 Sequencer Commands 

REPEAT LOOP, COUNTER NOT EQUAL 0 
CONDITIONAL JUMP PIPELINE AND POP 
TEST FOR END OF LOOP 
THREE WAY BRANCH 

MUST be preceded by a 

- PUSH/CONDITIONAL LOAD REGISTER/COUNTER 



continue 
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MASTER AM2910 SEQUENCER MENU 



XXXXXXXXXXXXXXXX 

ffff 



XX101111XX0X1001 

efd9 



XX 10000100011111 
ellf 



0 



The X s 



indicate bits which are not 



yet defined. 



What 



do you want 
Enter a 0 
H 
R 



to do next? 

to select SEQUENCER COMMAND 
for HELP with this program 
to RETURN to system 
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AM2910 SEQUENCER COMMAND MENU 



Enter 



Which AM 2 9 1 0 Sequencer Command do you wish to Chose? 



0 

1 

2 

3 

4 

5 

6 

7 

8 
9 
A 
B 
C 
D 
E 
F 
H 
R 



JUMP ZERO - JZ 
CONDITIONAL JUMP 
JUMP MAP - JMAP 
CONDITIONAL JUMP 
PUSH/CONDITIONAL 
CONDITIONAL JUMP 
CONDITIONAL JUMP 
CONDITIONAL JUMP 



SUBROUTINE - CJS 
PIPELINE - CJP 

LOAD REGISTER/PIPELINE - PUSH 
SUB. VIA REG OR PIPELINE - JSRP 
VECTOR - CJV 

VIA REGISTER OR PIPELINE 



REPEAT LOOP, COUNTER NOT EQUAL 0 - 
REPEAT PIPELINE, COUNTER NOT EQUAL 
CONDITIONAL RETURN FROM SUBROUTINE 
CONDITIONAL JUMP PIPELINE AND POP 
LOAD COUNTER AND CONTINUE - LDCT 
TEST FOR END OF LOOP - LOOP 
CONTINUE - CONT 
THREE WAY BRANCH - TWB 
HELP with this program 
RETURN to higher level 



RFCT 

0 - RPCT 
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^ << 



MASTER AM2910 SEQUENCER MENU 



XXXXXXXXXXXXXXXX 

ffff 



XX101111XX0X1001 

efd9 



XXlOOOOlOOOlllll 

ellf 



The X s indicate bits which are not yet defined 



What do you want 
Enter a 0 
H 
R 
r 

Do you really want to 



to do next? 

to select SEQUENCER COMMAND 
for HELP with this program 
to RETURN to system 

leave? 
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The following is a record of a terminal session running the ALU module. 



% tes 1 2 

MASTER AM29203 ALU MENU 



XXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXX 





ffff 




ffff 






ffff 


The 


X s indicate bits 


which 


are not 


ye 


t defined 




The 


defaults for the 


AM29203 


ALU are 


*, 








Register Address 


Select 


- bits 


47 


-45 - A , B 


pipel ine 


111 
















Instruction Enab 


le - bi 


t 44 - D 


i s 


able = 1 






Output Enable - 


bit 43 


- Disabl 


e 


= 1 






Source - bits 42 


-40 - D 


AQ = 111 










Des t inat ion - b i 


ts 39-3 


6 - YB US 


- 


ini 






ALU Function - b 


its 35- 


32 - OR 




ini 




What 


do you want to d 


o next? 











type a B to choose ALU FUNCTIONS 
S to choose SPECIAL FUNCTIONS 
H for HELP with this program 
R to RETURN to higher level 
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AM29203 ALU BASIC FUNCTION SELECT 



Enter the value corresponding to the function you wish to 



perform 










0 


F = 


High 




1 


F = 


S - R - 1 + Carry In 




2 


F = 


R - S - 1 + Carry In 




3 


R + 


S + Carry In 




4 


S + 


Carry In 




5 


(NOT S) + Carry In 




6 


R + 


Carry In 




7 


F = 


(NOT R) + Carry In 




8 


F = 


Low 




9 


F = 


(NOT R) AND S 




A 


F = 


R EXCLUSIVE OR S 




B 


F = 


R EXCLUSIVE OR S 




C 


F = 


R AND S 




D 


F = 


R NOR S 




E 


F = 


R NAND S 




F 


F = 


R OR S 




H 


for 


HELp with this program 


0 


R 


t o 


RETURN to higher level 
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AM29203 ALU SOURCE MENU 



You have chosen one of the following AM29203 ALU functions: 
F = High 

F = R + Carry In 
F + (NOT R) + Carry In 
F = LOW 



For these functions, the only allowed AM29203 ALU Sources 
ar e : 



Operand R 
RAMA 

Direct A 



Operand S 

Q Register 
Q Register 



Mnemonic 

RAMAQ 

DAQ 



Type a 



6 



6 

H 

R 



for RAMAQ 
for DAQ 

for HELP with this program 
to RETURN to a higher level 
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AM29203 ALU DESTINATION MENU 



Enter the value corresponding to the destination you 
desire 

0 RAMDA - F to RAM, Arithmetic Down Shift 

1 RAMDL - F to RAM, Logical Down Shift 

2 RAMQDA - Double Precision Arithmetic Down Shift 

3 RAMQDL - Double Precision Logical Down Shift 

4 RAM - F to RAM with parity 

5 QD - F to Y, Down Shift Q 

6 LOADQ - F to Q with parity 

7 RAMQ - F to RAM with parity 

8 RAMUPA - F to RAM, Arithmetic Up Shift 

9 RAMUPL - F to RAM, Logical Up Shift 

A RAMQ UP A - Double Precision Arithmetic Up SHift 
B RAMQUPL - Double Procision Logical Up SHift 
C - F to Y only 

D - F to Y, Up SHift Q 

E SIGNEXT - SIOO to Y(i) 

F RAMEXT - F to Y, Sign extend LSB 
I Instruction Register 
M Main Memory 

H for HELP with this program 
R to RETURN to higher level 
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You have chosen a down shift for this raicroword. There are 
16 possible shift patterns, coded 0 thru F in bits 19 
thru 16. Choose the shift pattern you desire from the 
f ol lowing set : 



zero 


= 


0 


-> 


RAMn , 


0 


~> 


Qn 








one 




1 


-> 


RAMn, 


1 


~> 


Qn 








two 


- 


0 


-> 


RAMn , 


RAMO 


“> 


Me , 


Mn 


— y 


Qn 


three 




1 


-> 


RAMn , 


RAMO 


-> 


Qn 








four 


= 


Me 


-> 


RAMn , 


RAMO 


-> 


Qn 








five 


= 


Mn 


-> 


RAMn , 


RAMO 


-> 


Qn 








six 


= . 


0 


-> 


RAMn , 


RAMO 


“> 


Qn 








seven 




0 


~> 


RAMn, 


RAMO 


-> 


Qn , 


Q0 


-> 


Me 


eight 


- 


RAMO 


-> 


RAMn , 


Q0 


-> 


Qn , 


RAMO 


-> 


Me 


nine 




Me 


-> 


RAMn , 


Q0 


"> 


Qn , 


RAMO 


-> 


Me 


A 


= 


RAMO 


-> 


RAMn , 


Q0 


-> 


Qn 








B 


= 


Ic 


-> 


RAMn , 


RAMO 


-> 


Qn 








C 


= 


Me 


~> 


RAMn , 


RAMO 


-> 


Qn , 


Q0 


- > 


Me 


D 




Q0 


"> 


RAMn, 


RAMO 


-> 


Qn , 


Q0 


-> 


Me 


E 


- 


In exor 


IOvr -> 


RAMn , 




RAMO -> 


Qn 




F 


- 


Q0 


-> 


RAMn , 


RAMO 


-> 


Qn 









H to get help with this procedure 
N to back up one frame. 
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AM29203 ALU INSTRUCTION AND OUTPUT ENABLE MENU 



Do you want the ALU results to appear on the Y-bus? 
Type an Y for YES 
Type a N for NO 



y 



Do you 
register 

during 



want 

this 



to change the contents 
ALU operation? 



of any ALU 



Type an Y for YES 
Type an N for NO 
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MASTER AM29203 ALU MENU 



XXXOO 1100 10 10000 XXXXXXXXXXX00100 XXXXXXXXXXXXXXXX 
e65 0 ffe4 ffff 

The X s indicate bits which are not yet defined 
The defaults for the AM29203 ALU are: 

Register Address Select - bits 47-45 - A,B pipeline 

111 

Instruction Enable - bit 44 - Disable = 1 
Output Enable - bit 43 - Disable = 1 
Source - bits 42-40 - DAQ = 111 
Destination - bits 39-36 - YBUS = 1111 
ALU Function - bits 35-32 - OR = 1111 

What do you want to do next? 

type a B to choose ALU FUNCTIONS 
S to choose SPECIAL FUNCTIONS 
H for HELP with this program 
R to RETURN to higher level 
r 

Do you really want to return to mastermenu? 
test2 
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MASTER AM29203 ALU MENU 



XXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXX 
ffff ffff ffff 

The X s indicate bits which are not yet defined 
The defaults for the AM29203 ALU are: 

Register Address Select - bits 47-45 - A,B pipeline 

111 

Instruction Enable - bit 44 - Disable = 1 
Output Enable - bit 43 - Disable = 1 
Source - bits 42-40 - DAQ = 111 
Destination - bits 39-36 - YBUS = 1111 
ALU Function - bits 35-32 - OR = 1111 



What 



do you want to do next? 
type a B to choose ALU FUNCTIONS 
S to choose SPECIAL FUNCTIONS 
H for HELP with this program 
R to RETURN to higher level 



s 
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AM29203 ALU SPECIAL FUNCTION MENU 



Enter the value corresponding to the function you wish to 
perform 

0 Unsigned multiply 

1 BCD to Binary Conversion 

M Multiprecision BCD to Binary Conversion 

2 Two’s Complement Multiply 

3 Decrement by 1 or 2 

4 Increment by 1 or 2 

5 Sign/Magnitude to Two’s Complement Conversion 

6 Two’s Complement Multiply 

7 BCD Divide by 2 

8 Single Length Morraalize 

9 Binary to BCD Conversion 

Z Multiprecision Binary to BCD Conversion 
A Double Length Normalize; First Division 
B BCD Add 

C Two’s Complement Divide 

D BCD Subtract F=R-S-1+ Carry In BCD 
E Two’s Complement Divide Correction and Remainder 
F BCD Subtract F = S- R-1 + Carry In BCD 
H for HELP with this menu 
R to RETURN to higher level 
7 
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AM29203 ALU SOURCE SELECT 



You have chosen an AM29203 ALU Special 



What sources do you want to use 



1 



Enter a 0 
1 

4 

5 
H 
R 



Operand R 



Operand S 



RAMA A 

RAM A 

DIRECT A 

DIRECT A 

for HELP with 

to RETURN to a 



RAM B 
DIRECT B 
RAM A 
DIRECT B 
this menu 
higher level 



Funct ion 



Mnemon i c 

RAMAB 

RAMADB 

DARAMB 

DADB 
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AM29203 ALU INSTRUCTION AND OUTPUT ENABLE MENU 



Do you want the ALU results to appear on the Y~bus? 
Type an Y for YES 
Type a N for NO 



y 



Do you want 


t o 


change the contents of any ALU 


register 






during this 


ALU 


operation? 


Type an 


Y 


for YES 


Type an 


N 


for NO 



n 
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AM29203 ALU REGISTER ADDRESS MENU 



The default source selection is Source A - pipeline, 
Source B - pipeline, Destination C - pipeline 



Enter the value corresponding to 
you desire 

Source A Source B 

0 Pipeline Pipeline 

1 Instruction Pipeline 

2 Pipeline Instruction 

3 Instruction Instruction 

4 Pipeline Pipeline 

5 Instruction Pipeline 

6 Pipeline Instruction 

7 Instruction Instruction 

1 



the register address 

Destination C 
Pipel ine 
Pipeline 
Pipel ine 
Pipeline 
Instruction 
Instruct ion 
Instruct ion 
Instruction 
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AM29203 ALU RAM A REGISTER SELECT 



Register 



Enter the value corresponding to the RAM 



you wish to select 



A 



5 



0 RAMA A Register 0 

1 RAMA A Register 1 

2 RAMA A Register 2 

3 RAMA A Register 3 

4 RAMA A Register 4 

5 RAMA A Register 5 

6 RAMA A Register 6 

7 RAMA A Register 7 

8 RAMA A Register 8 

9 RAMA A Register 9 

A RAMA A Register A 

B RAMA A Register B 

C RAMA A Register C 

D RAMA A Register D 

E RAMA A Register E 

F RAMA A Register F 

H for HELP with this menu 
R to RETURN to a higher level 
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MASTER AM29203 ALU MENU 



0011000101110000 XXXXXXXXXXXXXXXX XXXX0101XXXXXXXX 
3170 ffff f 5 f f 

The X s indicate bits which are not yet defined 
The defaults for the AM29203 ALU are: 

Register Address Select - bits 47-45 - A,B pipeline 

111 

Instruction Enable - bit 44 - Disable = 1 
Output Enable - bit 43 - Disable = 1 
Source - bits 42-40 - DAQ = 111 
Destination - bits 39-36 - YBUS = 1111 
ALU Function - bits 35-32 - OR = 1111 

What do you want to do next? 

type a B to choose ALU FUNCTIONS 
S to choose SPECIAL FUNCTIONS 
H for HELP with this program 
R to RETURN to higher level 
r 

Do you really want to return to mastermenu? 
tes t2 
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MASTER AM29203 ALU MENU 



XXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXX 
ffff ffff ffff 

The X s indicate bits which are not yet defined 
The defaults for the AM 29203 ALU are: 

Register Address Select - bits 47-45 - A,B pipeline = 

111 

Instruction Enable - bit 44 - Disable = 1 
Output Enable - bit 43 - Disable = 1 
Source - bits 42-40 - DAQ = 111 
Destination - bits 39-36 - YBUS = 1111 
ALU Function - bits 35-32 - OR = 1111 

What do you want to do next? 

type a B to choose ALU FUNCTIONS 
S to choose SPECIAL FUNCTIONS 
H for HELP with this program 
R to RETURN to higher level 
b 



115 



AM29203 ALU BASIC FUNCTION SELECT 



Enter the value corresponding to the function you wish to 
perform 

0 F = High 

1 F = S- R-1 + Carry In 

2 F=R-S-1+ Carry In 

3 R + S + Carry In 

4 S + Carry In 

5 (NOT S) + Carry In 

6 R + Carry In 

7 F = (NOT R) + Carry In 

8 F = Low 

9 F = (NOT R) AND S 

A F = R EXCLUSIVE OR S 
B F = R EXCLUSIVE OR S 
C F = R AND S 
D F = R NOR S 
E F = R NAND S 
F F = R OR S 

H for HELp with this program 
R to RETURN to higher level 
c 
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AM29203 ALU SOURCE MENU 



The source control default is DAQ 





Operand R 


Operand S 


Mnemon i c 


Enter a 


0 


RAMA 


RAMB 


RAMAB 




1 


RAMA 


Direct B 


RAMADB 




2 


RAMA 


Q Register 


RAMAQ 




4 


Direct A 


RAMB 


DARAMB 




5 


Direct A 


D i rectB 


DADB 




6 


Direct A 


Q Register 


DAQ 




I 


Instruction Register 






P 


Pipeline 


Register 






H 


for H with this program 




5 


R 


to RETURN 


to higher level 
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AM29203 ALU DESTINATION MENU 



Enter the value corresponding to the destination you 
desire 

0 RAMDA - F to RAM, Arithmetic Down Shift 

1 RAMDL - F to RAM, Logical Down Shift 

2 RAMQDA - Double Precision Arithmetic Down Shift 

3 RAMQDL - Double Precision Logical Down Shift 

4 RAM - F to RAM with parity 

5 QD - F to Y, Down Shift Q 

6 LOADQ - F to 0 with parity 
7' RAMO - F to RAM with parity 

8 RAMUPA - F to RAM, Arithmetic Up Shift 

9 RAMUPL - F to RAM, Logical Up Shift 

A RAMQUPA - Double Precision Arithmetic Up SHift 
B RAMQUPL - Double Procision Logical Up SHift 
C F to Y only 

D - F to Y, Up SHift Q 

E SIGNEXT - SIOO to Y(i) 

F RAMEXT - F to Y, Sign extend LSB 
I Instruction Register 
M Main Memory 

H for HELP with this program 
R to RETURN to higher level 
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AM29203 ALU INSTRUCTION AND OUTPUT ENABLE MENU 



Do you want the ALU results to appear on the Y-bus? 
Type an Y for YES 
Type a N for NO 



y 

Do you 
register 

during 



want 

this 



to change the contents 
ALU operation? 



of any ALU 



y 



Type an Y for YES 
Type an N for NO 
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MASTER AM29203 ALU MENU 



XXX0010 101 111100 XXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXX 
e5 7 c ffff ffff 

The X s indicate bits which are not yet defined 
The defaults for the AM29203 ALU are: 

Register Address Select - bits 47-45 - A,B pipeline 

111 

Instruction Enable - bit 44 - Disable = 1 
Output Enable - bit 43 - Disable = 1 
Source - bits 42-40 - DAQ = 111 
Destination - bits 39-36 - YBUS = 1111 
ALU Function - bits 35-32 - OR = 1111 

What do you want to do next? 

type a B to choose ALU FUNCTIONS 
S to choose SPECIAL FUNCTIONS 
H for HELP with this program 
R to RETURN to higher level 
r 

Do you really want to return to mastermenu? 
t es 1 2 
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MASTER AM29203 ALU MENU 



XXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXX 
ffff ffff ffff 

The X s indicate bits which are not yet defined 
The defaults for the AM29203 ALU are: 

Register Address Select - bits 47-45 - A,B pipeline 

111 

Instruction Enable - bit 44 - Disable = 1 
Output Enable - bit 43 - Disable = 1 
Source - bits 42-40 - DAQ = 111 
Destination - bits 39-36 - YBUS = 1111 
ALU Function - bits 35-32 - OR = 1111 

What do you want to do next? 

type a B to choose ALU FUNCTIONS 
S to choose SPECIAL FUNCTIONS 
H for HELP with this program 
R to RETURN to higher level 
b 
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AM29203 ALU BASIC FUNCTION SELECT 



Enter the value corresponding to the function you wish to 



perform 


0 


F 


- 


High 




1 


F 


- 


S - R - 1 + Carry In 




2 


F 


= 


R - S - 1 + Carry In 




3 


R 


+ 


S + Carry In 




4 


S 


+ 


Carry In 




5 


(NOT S) + Carry In 




6 


R 




Carry In 




7 


F 


= 


(NOT R) + Carry In 




8 


F 


- 


Low 




9 


F 


= 


(NOT R) AND S 




A 


F 


= 


R EXCLUSIVE OR S 




B 


F 


— 


R EXCLUSIVE OR S 




C 


F 


= 


R AND S 




D 


F 


= 


R NOR S 




E 


F 


= 


R NAND S 




F 


F 


= 


R OR S 




H 


for 


HELp with this program 


2 


R 


t o 


RETURN to higher level 
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The Carry into the least significant stage of the ALU 
is controlled by bits 112 and 111, and sometimes bits 
15, 13, 12, and II. There are seven possible choices: 

Type a zero to select ZERO as the carry-in. 

Type a one to select ONE as the carry-in. 

Type a two to select Cx, the Z output of the 29203. 

Type a three to select the carry bit from the micro reg 

Type a four to select the micro carry bit complemented 

Type a five to select the MACRO carry bit 

Type a six to select the MACRO carry bit complemented 
Type an H for help. 
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AM29203 ALU SOURCE MENU 



The source control default is DAQ 





Operand R 


Operand S 


Mnemonic 


Enter a 


0 


RAMA 


RAMB 


RAMAB 




1 


RAMA 


Direct B 


RAMADB 




2 


RAMA 


Q Register 


RAMAQ 




4 


Direct A 


RAMB 


DARAMB 




5 


Direct A 


DirectB 


DADB 




6 


Direct A 


Q Register 


DAQ 




I 


Instruction Register 






P 


Pipel ine 


Register 






H 


for H with this program 




0 


R 


to RETURN 


to higher level 
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AM29203 ALU DESTINATION MENU 



Enter the value corresponding to the destination you 
des i re 

0 R AMD A - F to RAM, Arithmetic Down Shift 

1 RAMDL - F to RAM, Logical Down Shift 

2 RAMQDA - Double Precision Arithmetic Down Shift 

3 RAMQDL - Double Precision Logical Down Shift 

4 RAM - F to RAM with parity 

5 QD - F to Y, Down Shift Q 

6 LOADQ - F to Q with parity 

7 RAMQ - F to RAM with parity 

8 RAMUPA - F to RAM, Arithmetic Up Shift 

9 RAMUPL - F to RAM, Logical Up Shift 

A RAMQUPA - Double Precision Arithmetic Up SHift 
B RAMQUPL - Double Procision Logical Up SHift 
C - F to Y only 

D - F to Y, Up SHift Q 

E SIGNEXT - SIOO to Y(i) 

F RAMEXT - F to Y, Sign extend LSB 
I Instruction Register 
M Main Memory 

H for HELP with this program 
R to RETURN to higher level 
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You have chosen a down shift for this microword. There 
16 possible shift patterns, coded 0 thru F in bits 19 
thru 16. Choose the shift pattern you desire from the 
following set: 



zero 


= 


0 


-> 


RAMn , 


0 


-> 


Qn 








one 


- 


1 


~> 


RAMn , 


1 


- > 


Qn 








two 


= 


0 


-> 


RAMn , 


RAMO 


-> 


Me, 


Mn 


- > 


Qn 


three 


= 


1 


-> 


RAMn, 


RAMO 


~> 


Qn 








four 


= 


Me 


-> 


RAMn , 


RAMO 


-> 


Qn 








five 


- 


Mn 


-> 


RAMn, 


RAMO 


-> 


Qn 








six 


= 


0 


-> 


RAMn, 


RAMO 


-> 


Qn 








seven 


= 


0 


“> 


RAMn, 


RAMO 


-> 


Qn , 


QO 


-> 


Me 


eight 


= 


RAMO 


"> 


RAMn, 


QO 


-> 


Qn , 


RAMO 


-> 


Me 


nine 


= 


Me 


-> 


RAMn , 


QO 


~> 


Qn , 


RAMO 


~ > 


Me 


A 


- 


RAMO 


-> 


RAMn , 


QO 


“> 


Qn 








B 


= 


Ic 


~> 


RAMn, 


RAMO 


~> 


Qn 








C 


= 


Me 


-> 


RAMn, 


RAMO 


-> 


Qn , 


QO 


- > 


Me 


D 


= 


QO 


-> 


RAMn , 


RAMO 


~> 


Qn , 


QO 


-> 


Me 


E 


= 


In e x o r 


IOvr -> 


RAMn, 




RAMO -> 


Qn 




F 


= 


QO 


~> 


RAMn , 


RAMO 


-> 


Qn 









H to get help with this procedure 
N to back up one frame. 



are 
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AM29203 ALU INSTRUCTION AND OUTPUT ENABLE MENU 



Do you want the ALU results to appear on the Y-bus ? 
Type an Y for YES 
Type a N for NO 



y 

Do you want to change the contents of any ALU 
regis ter 

during this ALU operation? 



Type an Y for YES 
Type an N for NO 
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AM29203 ALU REGISTER ADDRESS MENU 



The default source selection is Source A - pipeline, 
Source B - pipeline, Destination C - pipeline 



Enter the value corresponding to 
you desire 

Source A Source B 

0 Pipeline Pipeline 

1 Instruction Pipeline 

2 Pipeline Instruction 

3 Instruction Instruction 

4 Pipeline Pipeline 

5 Instruction Pipeline 

6 Pipeline Instruction 

7 Instruction Instruction 

2 



the register address 

Destination C 
Pipeline 
Pipel ine 
Pipel ine 
Pipeline 
Inst rue t ion 
Instruct ion 
Instruction 
Inst ruct ion 



128 



AM29203 ALU RAM A REGISTER SELECT 



Register 

you 



Enter the value corresponding to the RAM 
wish to select 



A 



1 



0 RAMA A Register 0 

1 RAMA A Register 1 

2 RAMA A Register 2 

3 RAMA A Register 3 

4 RAMA A Register 4 

5 RAMA A Register 5 

6 RAMA A Register 6 

7 RAMA A Register 7 

8 RAMA A Register 8 

9 RAMA A Register 9 

A RAMA A Register A 

B RAMA A Register B 

C RAMA A Register C 

D RAMA A Register D 

E RAMA A Register E 

F RAMA A Register F 

H for HELP with this menu 
R to RETURN to a higher level 
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AM29203 ALU RAM B REGISTER SELECT 



Register 

you 



Enter the value corresponding to the RAM B 
wish to select 



0 


RAM 


B 


Register 


0 


1 


RAM 


B 


Register 


1 


2 


RAM 


B 


Register 


2 


3 


RAM 


B 


Register 


3 


4. 


RAM 


B 


Register 


4 


5 


RAM 


B 


Register 


5 


6 


RAM 


B 


Register 


6 


7 


RAM 


B 


Register 


7 


8 


RAM 


B 


Register 


8 


9 


RAM 


B 


Regist er 


9 


A 


RAM 


B 


Register 


A 


B 


RAM 


B 


Register 


B 


C 


RAM 


B 


Register 


C 


D 


RAM 


B 


Regist er 


D 


E 


RAM 


B 


Register 


E 


F 


RAM 


B 


Register 


F 


H 


for 


HELP with ■ 


this menu 


R 


to RETURN to a 


higher level 
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>> ^ 



MASTER AM29203 ALU MENU 



0100000000010010 01XXXXXXXXX00011 XXXX00011110XXXX 
4012 7fe3 fief 

The X s indicate bits which are not yet defined 
The defaults for the AM29203 ALU are: 

Register Address Select - bits 47-45 - A,B pipeline = 

111 

Instruction Enable - bit 44 - Disable = 1 
Output Enable - bit 43 - Disable = 1 
Source - bits 42-40 - DAQ = 111 
Destination - bits 39-36 - YBUS = 1111 
ALU Function - bits 35-32 - OR = 1111 

What do you want to do next? 

type a B to choose ALU FUNCTIONS 
S to choose SPECIAL FUNCTIONS 
H for HELP with this program 
R to RETURN to higher level 
r 

Do you really want to return to mastermenu? 
t es 1 2 
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APPENDIX B 



Program Name: Seqmake 

Purpose: The Makefile used to compile the Sequencer 

module and its submodules. The name 
Seqmake must be changed to makefile before using. 



test3: 2910. o utils. o 

cc 2910. o utils. o -o test3 
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Program name: 2910. c 

Purpose: Source code for Sequencer module. 



♦include <stdio.h!> 

♦ include ’’declare. h" 



/* these defines refer to the logical fields of the 
microword they are used to pass field_set the fields --note 
these defines are commented out!! they are provided for 
readability only. 



♦def ine 
♦def ine 
♦def ine 
♦def ine 
♦def ine 
♦define 
♦def ine 
♦define 
♦def ine 
♦def ine 
♦def ine 
♦define 
♦def ine 
♦def ine 
♦def ine 
♦define 
♦def ine 
♦def ine 
♦define 
♦define 
♦def ine 
♦define 
♦def ine 
♦def ine 
♦define 
*/ 



regsel 1 
ien_f Id 2 
oey_fld 3 
source_fld 4 
dest_fld 5 
function_fld 6 
carryin_fld 7 
15 I4_f Id 8 
I3_I0_f Id 9 
I5~I0_f Id 10 
ceu_f Id 11 
cem_fld 12 
cmden_fld 13 
shif ten_f Id 14 
command_fld 15 
shif t_f Id 16 
breakpoint_f Id 17 
notusedfld 18 
msb_br_fld 19 
mid_br_f Id 20 
lsb_br_f Id 21 
rega_fld 22 
regb_f Id 23 
seq_fld 24 
no sub 0 



int KEEPgo ing , goback , docu_wo rd [ 24 ] ; 

char cmd_line[80] , *pcmd , *pmwd,micro_word[49] ; 

main ( ) 

{ 

int i , helpset ; 

char CONTINUEcommand [ 4 ] , am2910command [ 80 ] ; 

/* Initialize raicro__word to ’X’ and docu_word to 0 */ 

micro_word [ 48 ] = 5 \0’; 

for (i=0;i < 48; i + + ) 
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micro_word[ij = * X * ; 

for ( i = 0 ; i < 2 4 : i + + ) 

docu_wor d [ i ] = 0 ; 



KEEPgoing = true; 
helpset = false ; 
goback = false; 

while (KEEPgoing ! ! helpset) /* 

{ /* 

helpset = false; /* 

am2 9 1 Omenu ( am29 1 0 command ) ; /* 

/* 

if ( *ara2910comraand == ’O’) 

{ 

COMMANDS elect ( ) ; 
if (goback) 

{ 

helpset = true; 
goback = false; 

} 

} 

else 

if ( *am2910cominand == ’H’ ! ! *am2910command -= ’ h ’ ) 

{ 

helpset - true; 

puts("Help will be coining soon!.\0”); 
puts ( tf Press enter to continue\0” ); 
get s (CONTINUEcoramand) ; 

} 

else 

if ( ( *am2910coraraand == ’R’ ! ! *ara2910coraraand == *r*) 

! I (KEEPgoing == false)) 

{ 

puts( ft Do you really want to leave?\0 ,? ) ; 
gets ( CONTINUEcoramand) ; 
switch( *CONT I NUE command ) 

{ 

case * YES * : 
case ’yes’: 
case ’ Y’ : 
case ’ y ’ : 

KEEPgoing = false; 
break; 

} 

} 

else 

{ 

helpset = true; 



Need both KEEPgoing and */ 
helpset = 0 to get out of*/ 
main program section. */ 

KEEPgoing is global and * 
can be set from ext proc.*/ 
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puts( M Your input is invalid, enter 0,h,H,r,R only. x O” 
s 1 e e p ( 3 ) ; 

\ 

; 

} /* while */ 

exi t ( ) ; 

} /* procedure am2910master */ 



/********************************************************** 

/* * / 

/* AM2910 MENU PROCEDURES */ 

/* */ 



am2910menu( am 2 9 10 command) 
char *am2910command; 

{ 

puts (erase_screen) ; 

puts("\t\t\tMASTER AM2910 SEQUENCER MENU\n\0"); 
display_word( ) ; 
display_in_hex() ; 
display_docu( ) ; 

puts("\tThe X s indicate bits which are not yet 

def i ned . \n\ 0 M ) ; 

pu t s ( M \ tWhat do you want to do next?\0 M ); 

puts ( M \t\tEnter a 0 to select SEQUENCER COMMAND \ 0 tr ) ; 

puts( f, \t\t H for HELP with this pr ogr am\ 0 ” ) ; 

puts( M \t\t R to RETURN to system\0 M ) ; 

ge ts ( am2910comraand) ; 

} /* procedure AM2910menu */ 



SEQUENCE Rmenu( SEQUENCERcoramand) 



char *SEQUENCERcommand ; 



{ 



puts(erase_screen) ; 

puts ( "\t\t\tAM2910 SEQUENCER COMMAND MENU\n\0”); 
puts ( "\tWhich AM2910 Sequencer Command do you wish to 



puts( "Enter a 0 



puts ( " 1 

p u t s ( " 2 

put s ( " 3 

put s ( " 4 



Chose?\n\0” ) ; 

JUMP ZERO - JZ\0") ; 

CONDITIONAL JUMP SUBROUTINE - CJS\0”); 
JUMP MAP - JMAP\ 0 " ) ; 

CONDITIONAL JUMP PIPELINE - CJP\0"); 
PUSH/CONDITIONAL LOAD REG I STER/ P I PE L I NE 

- PUS H\ 0 " ) ; 
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put s ( 

put s ( 
puts ( 

put s ( 

put s ( 

put s ( 
puts ( 
put s ( 
puts ( 
put s ( 
put s ( 
put s ( 
puts ( 
gets ( 



” 5 CONDITIONAL JUMP SUB. VIA REG OR 

PIPELINE - JSRPYO”) 

" 6 CONDITIONAL JUMP VECTOR - CJV\0"); 

" 7 CONDITIONAL JUMP VIA REGISTER OR 

PIPELINE\0" ) 

” 8 REPEAT LOOP, COUNTER NOT EQUAL 0 - 

RFCT\0”) 

" 9 REPEAT PIPELINE, COUNTER NOT EQUAL 0 - 

RPC T\ 0 " ) 

" A CONDITIONAL RETURN FROM SUB ROUT I NE\0 ; 

" B CONDITIONAL JUMP PIPELINE AND POP\0"); 

’’ C LOAD COUNTER AND CONTINUE - LDCT\0"); 

" D TEST FOR END OF LOOP - LOOP\0"); 

” E CONTINUE - CONT\ 0 " ) ; 

" F THREE WAY BRANCH - TWB\0"); 

" H HELP with this program\0"); 

" R RETURN to higher level\0”); 

SEQUENCERcommand) ; 



} /* procedure SEQUENCER menu */ 



BRANC Hmenu ( branchselect) 
char ^branchselect ; 



puts(erase_screen) ; 

puts(" \t\t AM29 10 SEQUENCER BRANCH ADDRESS MENU\n\0”); 
puts("You have chosen a command which requires a value in 

the\0 " ) ; 

puts( "register/counter\n\0” ) ; 

puts("What do you want to do next?\n\0") ; 

puts ( "\tENTER YOUR BRANCH ADDRESS FIELD\0") ; 

puts("\t H for HELP with this program \0"); 

puts(”\t R to RETURN to a higher level\0"); 

gets (branchselect ) ; 

} /* procedure branch menu */ 



PUSHmenu () 



char CONTINUEcommand [4] ; 
puts ( erase_screen ) ; 

puts( "\t\t\tREMINDER INFORMAT ION\n\0" ) ; 
puts("You have chosen a PUSH/CONDITIONAL LOAD 

REGISTER/COUNTER -PUSH\0"); 
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puts( "\tas 
puts ( "This 



the AM2910 Sequencer 
command MUST precede 



CommandX n\0 " ) ; 
the following 

commands : \n\ 0 " 

REPEAT LOOP, COUNTER NOT EQUAL 0\0”): 
CONDITIONAL JUMP PIPELINE AND POP\0"); 
TEST FOR END OF LOOP\0"); 

THREE WAY BRANCH\n\n\n\0 " ) ; 
puts(" Press enter to continue\0"); 
ge t s ( CONT INUEcommand ) ; 



puts("\t\tRFCT 
put s ( ” \ t \ tC JPP 
puts("\t\tLOOP 
puts( "\t\tTWB 



} /* procedure PUSHmenu */ 



LDCTmenu ( ) 



char CONTINUEcommand [ 4 ] ; 
puts ( erase_screen ) ; 

puts ( "\t\t\tREMINDER INFORMAT ION\n\ 0 " ) ; 

puts("You have chosen a LOAD COUNTER AND CONTINUE -LDCT- 

as the\0") 

put s ( " \ t AM29 1 0 Sequencer C omman d\ n\ 0 " ) ; 

puts("This command MUST precede the f ol lowing : \n\0 ") ; 



puts("\t\tJRP 

puts("\t\tRPCT 



CONDITIONAL JUMP 
REPEAT PIPELINE, 



REGISTER OR 
COUNTER NOT 



puts(" Press enter to continue\0") 
gets (CONTINUEcommand) ; 



PIPELINENO" 

EQUAL 

0\n\n\n\0" 



} /* procedure LDCTmenu */ 



NEED PUSHmenu ( ) 



char CONTINUEcommand [ 4 ] ; 
puts ( erase_screen ) ; 

puts( "\t\t\tREMINDER INFORMAT I ON\n\0" ) ; 
puts("You have chosen one of the following 2910 



puts(" \t\tRFCT 
puts ( "\t\tCJPP 
puts ( "\t\tLOOP 
puts(" \t\ tTWB 



NOT 



Sequencer 
Commands\n\ 0 " ) 
EQUAL 0\0" ) ; 

AND POP\ 0 ” ) ; 



REPEAT LOOP, COUNTER 
CONDITIONAL JUMP PIPELINE 
TEST FOR END OF LOOP\0"); 

THREE WAY BRANCH\n\0" ) ; 
puts("These commands MUST be preceded by a\n\0"); 
puts(" \t\tPUSH - PUSH/CONDITIONAL LOAD 

REGISTER/COUNTER\n\n\n\0" ) 
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puts ("Press enter to continue\0"); 
ge t s ( CONT I NUE command ) ; 

} /* procedure need_push menu */ 



NEED LDCTmenu () 



char CONTINUEcommand [4] ; 
puts(erase_screen) ; 

puts ("\t\t\t REMINDER INFORMAT ION\n\0 ” ) ; 
puts("You have chosen one of the following AM2910 

Sequencer Commands: \n\0"); 
puts ( "\t\t JRP JUMP REGISTER OR PIPELINE'S. 0" ) ; 
puts( "\t\tRPCT REPEAT PIPELINE, COUNTER NOT EQUAL 

0 \ n \ 0 " ) : 

puts ( "These commands MUST be preceded by a\0"); 
puts ( "\t\tLDCT - LOAD COUNTER AND CONTINUE\n\n\n\0" ) ; 
puts("Press enter to cont inue\0" ) ; 
gets ( CONTINUEcommand) ; 

} /* need_ldct menu */ 



CONDITIONmenu ( COND ITIONcommand) 
char *C0ND ITIONcommand ; 



puts ( erase_screen) ; 

puts( "\t\tAM2910 SEQUENCER CONDITION SELECT MENU\n\0"); 
puts ( "You have chosen an AM2910 Sequencer Command which 

requires a\0") 

puts("\tconditional test\n\0") ; 
puts("What do you want to do next?\n\0" ) ; 

P for FORCED PASS - uncondi tional\0" ) ; 

F for FORCED FAIL\0" ) ; 

T to TEST the cond i t i on\ 0 ” ) ; 

H for HELP with this program\0"); 

R to RETURN to higher level\0"); 



puts ( "\ tType 
put s ( " \ t 
puts("\t 
puts ( "\t 
p u t s ( " \ t 



gets ( COND ITIONcommand ) 



} /* procedure condition menu */ 
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TESTlmenu(TESTlselect ) 
char *TE S T Is e 1 ec t ; 



{ 



} 



puts ( erase_screen ) ; 

puts( "\t\t\tAM2904 CONDITIONAL TEST MENU\n\0"); 
puts ( " There are two steps to selecting a test 

condition\0") ; 

puts ( M 1) select a REGISTER to be used\0”); 

puts ( tT 2) select a TEST on that r egi s t er\n\0 " ) ; 

puts(" This menu selects the register ot two special 

tests\0") ; 



puts ( " 
puts ( " 
put s ( ” 
puts ( " 
puts ( ’’ 
puts(" 



which 

What 

Type 



combine two registers\n\0"); 
do you want to do?\n\0" ); 

a 0 for the Micro status register\0" 1 ; 

1 for the MACRO Status Register\0” ) ; 

2 for the Immediate Status lnputs\0";; 

3 for Immediate Sign EXOR MACRO 

S i g n \ 0 ” ) ; 



p u t s ( ’’ 4 

puts(" H 

puts ( R 

gets(TESTlselect) ; 

/* procedure TESTlmenu */ 



for Immediate Sign EXNOR MARCO 

S i g n \ 0 ' 

for HELP with this menu\0"); 
to RETURN to a higher level\0"); 



cond_l_set(pchar) 

/* This is the first level cond. code select, and matches 

TESTlmenu. * 

char *pchar; 

{ 

in t next_level ; 

char *field,field_line[4]; 

next_level = TRUE; 

switch (*pchar) 

{ 

case ’O’: /* Micro status register selected. */ 

bit__clear(I05_04) ; 
bit_set(I04_04) ; 

/* Note that 104 can be cleared for many cases, see Tb 1 . 4, 

Pg 5-79 */ 

break; 

case ’l’: /* Macro status register. */ 

b i t_se t ( I05_04 ) ; 
bit_clear(I04_04) ; 
break ; 
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case ’2’: /* Immediate Inputs. */ 

bit_set(I05_04); 
bit_set(I04_04); 
break; 

case ’3’: /* I mm. sign ex or MSR sign */ 

*pchar = ’ e , ; 

field_set(condtest_fld,3,pchar) ; 

next_level = FALSE; 

break; 

case ’4’: /* Imra. sign exnor MSR sign */ 

*pchar = 9 f 9 ; 

field_set(condtest_fld, 3, pchar) ; 
next_level = FALSE; 
break ; 

} 

return (next_level) ; 

} /* end cond_l_set */ 



TEST2menu(TEST2select) 



char *TEST2select; 



{ 



puts(erase_screen) ; 

puts ( "\t\t\tAM2904 CONDITIONAL TEST MENU\n\0"); 
puts(" What condition do you want reflected by the 

condition?\n\0") ; 

puts ( Type a 0 for (SIGN exor OVR) or ZERO\0"); 

puts(" 1 for (SIGN exnor OVR) and not 

ZERO\0" ) ; 



put s ( " 2 
puts(" 3 
puts ( 4 
puts(" 5 
puts ( " 6 
puts ( 11 7 
puts(" 8 
puts ( " 9 
puts(" A 
puts ( B 
put s ( " C 
puts ( " D 
puts(" E 
puts ( 11 F 
puts(" H 
puts ( " R 



gets(TEST2select) ; 



for (SIGN exor OVR)\0’’); 

for (SIGN exnor OVR)\0"); 

for ZERO\0" ) ; 

for not ZERO\0" ) ; 

for 0 VR\0 " ) ; 

for not 0 V R \ 0 " ) ; 

for (CARRY or ZERO)\0") ; 

for (not CARRY) or (not ZERO)\0"); 

for CARRY\0" ) ; 

for not CARRY\0" ) ; 

for (not CARRY or ZERO)\0”); 

for (CARRY or not ZERO)\0"); 

for S IGN\0" ) ; 

for not S I G N \ 0 " ) ; 

for HELP with this menu\0"); 

to RETURN to a higher levelXO"); 
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} /* procedure TEST2 */ 



cond_2_set(pchar) 

char ( *pchar ) ; 

/* This is the second level selection of the cond. test */ 

{ 

switch (*pchar) 

{ 



case 


’ 0 ’ 


/* 


SIGN exor OVR 


or ZERO */ 


case 


’ 1 * 


/* 


SIGN exnor OVR and not ZERO */ 


case 


’ 2 ’ 


/* 


SIGN exor OVR 


*/ 


case 


’3’ 


/* 


SIGN exnor OVR */ 


case 


’ 4 ’ 


/* 


ZERO */ 




case 


’5’ 


/* 


not ZERO */ 




case 


’6’ 


/* 


OVR */ 




case 


’7’ 


/* 


not OVR */ 




case 


’8’ 


/* 


CARRY or ZERO 


*/ 


case 


’9’ 


/* 


not CARRY or 


not ZERO */ 


case 


’A’ 


/* 


CARRY */ 




case 


’a’ 








cas e 


’ B ’ 


/* 


not CARRY */ 




case 


’b’ 








case 


’ C ’ 


/* 


not CARRY or 


ZERO */ 


case 


’ c’ 








case 


’ D ’ 


/* 


CARRY or not 


ZERO */ 


case 


’d’ 










field_set(condtest_fld 


, 4 , pchar) ; 




if (micro 


_word [ I05_04 ] 


= =’0’ ) 






bit_erase(I04_04) ; 






break; 






case 


’ E’ 


/* 


SIGN */ 




case 


’ e’ 








case 


’ F’ 


/* 


not SIGN */ 




case 


’ f ’ 









field_set(condtest_fld, 4, pchar) ; 
break ; 

} 

} /* end procedure cond_2_set */ 
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/* * 

/* AM2910 PROCESSING PROCEDURES *./ 

/* */ 



BRANCHaddress ( ) 

{ 

char *branchselect, * CONTINUE comm and ,cmd_line[80] , 
cont_l ine [ 10 ] ; 
int helpset; 

branchselect = cmd_line; 

CONTINUEcommand = cont_line; 
helpset = true; 
wh ile (helpset) 

{ 

helpset = false ; 

BRANCHmenu ( b ranchs e 1 ect ) ; 
switch(*branchselect) 

{ 

case ’ H ’ : 

case ’h’: /* help */ 

helpset = true; 

puts("The branch address field is 12 bits 

long , \0" ) ; 

puts( M the max hex address is 3FF.\0"); 
puts("Enter anything to cont inue . \0 " ) ; 
gets (CONTINUEcommand) ; 
break ; 

case ’ R ’ : 

case ’r’: /% Return */ 

goback = true; 
break ; 



default: 

printf ( "This is the address being 

used. s \ n ” , branchselect) ; 
CONTINUEcommand = branchselect; 
if ( ( *CONTINUEcommand<=' 3 ’ &&*CONTINUEcommand>= ’ 0 ’ ) 

&&( ( *(++CONTINUEcommand) > = ’ 0 ’ &&*CONTINUEcommand< = ’ 7 ’ ) 
I I ( *CONT INUE command > = ’ A ’ &&*CONT INUE command < = ’ F ’ ) 

: : ( * CONT INUE command) = ’ a ’ && *C 0 NT INUE command / = ’ f ’ ) ) 
&&( ( * (++C0NT INUE command ) >= ’ 0 ’ &&*CONTINUEcommand<= ’ 7 ’ ) 
1 I ( *CONT INUE command) = ’ A’ &&*CONTINUEcommand / = ’ F’ ) 

! ! ( *CONT INUE command) = •’ a ’ && *CONT INUE command < = ’ f ’ ) ) ) 
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{ 

field_set(msb_br_fld,0,branchselect) ; 

J 

else 

/ 

L 

helpset = true; 

puts ( M Invalid input, the max hex number is 

3 F F . \ 0 " ; 

puts( f, Press enter to con t i n ue\ 0 " ) ; 
ge t s ( CONT INUEcomraand ) ; 

} 

break ; 

> 

} / * whi le */ 

} / * procedure branch address select */ 



CONDITIONsequencer( ) 

{ 

char *CONTINUEcommand , *COND ITIONcommand , cmd_line[80] , 
cont_line[10] ; 
int helpset, helpl,help2; 

COND I T IONcommand = cmd_line; 

CONTINUEcommand = cont_line; 

do 

{ 

helpset = false ; 

COND IT IONmenuf COND IT IONcommand) ; 
switch(*COND ITIONcommand) 

{ 

case 9 h ’ : 
case ’ H ’ : 

helpset = true; 

puts("Help is coming Real Soon Now!\0 ,f ); 
puts(" Press enter to continue. \0 n ); 
gets (CONTINUEcommand) ; 
break; 
case 9 r * : 
case 9 R ’ : 

goback = true; 
break; 

case 9 p * : 

case *P*: /* FORCED P AS S--uncond i t ional */ 

field_set(condtest_fld, 1, COND ITIONcommand) ; 
break ; 
case ’ f ’ : 
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case ’F’: /* FORCED FAIL */ 

field_set(condtest_fld, 2 , COND I T I ON command ) ; 
break; 
case ’ t ’ : 

case * T ’ : / * TEST the condition * / 

do 

{ 

helpl = false; 

TESTlmenu(CONDITIONcommand) ; 
switch(*CONDITIONcommand) 

{ 

case ’ r ’ : 
case 9 R ’ : 

helpset - true; 
break; 
case ’ h ’ : 
case ’ H’ : 

helpl = true; 

puts( Tt Here’s where help would be nice!\0") 
puts( ,f Press enter to continue. \0" ) ; 
gets ( CONTINUEcomraand) ; 
break; 
def aul t : 

if (cond_l_set (CONDITIONcoraraand) ) 

{ 

do 

{ 

help2 = false ; 

TES T2menu ( COND I T IONcomraand ) ; 
switch (*CONDITIONcommand) 

{ 

case ’ r ’ : 
case ’ R ’ : 

helpset = true; 
break ; 
case ’ h 9 : 
case 9 H ’ : 

help2 = true; 

puts( M Help goes here! \0’') ; 
puts( M Press enter to cont.\0 M ); 
gets (CONTINUEcoramand) ; 
break ; 
default: 

cond_2_set ( COND I T I ONcomman d ) ; 
break ; 

} 

} 

while(help2) ; 

} 

break; 

} 
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whi le ( helpl ) ; 
break; 
default: 

helpset = true ; 

puts ( " Invalid input, wait for menu. \0") ; 
s 1 eep ( 1 ) ; 
break ; 

} 

} 

whi le ( helpset ) ; 

} /* procedure CONDITION sequencer */ 



COMMANDS elect ( ) 

{ 

char C0NTINUEcommand[4] , *SEQUENCERcommand, comd_line[80] ; 
in t helpset ; 

SEQUENCERcoinmand = comd_line; 
do 

{ 

helpset = false ; 

SEQUENCE Rmenu(SEQUENCERco mm and) ; 

switch(* SEQUENCERcommand ) 

{ 

case * r ’ : 
case ’ R * : 

/ * do nothing, keeps helpset = false * / 
break ; 
case * h * : 
case * H ’ : 

helpset =true; 

puts("Help is coming, Real Soon Now!\0"); 
puts( M Press enter to continue. \0"); 
gets (CONTINUEcoramand) ; 
break ; 

/* The sub_set parameter of the field_set 
procedure is being used here to indicate 
four groupings of the choices for the 
sequencer field: 

1 means seq. field only is set. 

2 means branch address field is set. 

3 means conditional codes are set. 

4 means all three of above are set. 

^The above codes are put into the docu_word 
so that subsequent attempts to change the 
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seq. code can be done cleanly i.e. without 
leaving branch addr and cond codes from 
previous settings of the s e q _ f 1 d . The 
docu_word entry can be read and "decoded” 
to reset any appropriate fields. */ 



case 


’ 0 ’ 


case 


’2’ 


case 


’8’ 


case 


’9’ 


case 


’e’ 


case 


’ E ’ 


case 


’ c’ 


case 


’ C ’ 


case 


’6’ 


case 


’ a ’ 


case 


’A’ 


case 


’ d’ 


case 


’ D ’ 


case 


’ 1 ’ 


case 


’ 3 ’ 


case 


’4’ 


case 


’5’ 


case 


’7’ 


case 


’b’ 


case 


’ B ’ 


case 


’ f ’ 


case 


’ F ’ 


default: 



field_set(seq_fld, 1 , SEQUENCER command ) ; 
break; 



field_set(seq_fld, 2, SEQUENCERcommand) ; 
break; 



field_set(seq_fld, 3, SEQUENCERcommand) ; 
break; 



field_set(seq_fld, 4, SEQUENCERcommand) ; 
break ; 

helpset = true; 

put s ( " Inval i d input, digits or ALL CAPS or 

r,R,h,H\0 M ); 

puts( "Press enter to continue. \0"); 
ge t s ( CONT INUEcommand ) ; 
break ; 



if( ( ^SEQUENCERcommand - 


= ’ 1’ ) ! 


1 ( ^SEQUENCERcommand == 


’ 3 ’ ) 


(^SEQUENCERcommand = = 


’4’ ) ; : 


( ^SEQUENCERcommand == 


’5’ ) 


(^SEQUENCERcommand == 


’ 7 ’ ) : : 


( ^SEQUENCERcommand == 


’B’ ) 


(^SEQUENCERcommand == 


’ c ’ ) : : 


( ^SEQUENCERcommand == 


’ F ’ ) 


( * SEQUENCER command == 


’ c’ ) : : 


( ^SEQUENCERcommand == 


’ f’ ) 


(^SEQUENCERcommand == 


’b’ )) 
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BRANCHaddress( ) ; 



if ((( ♦SEQUENCERcommand == 
(♦SEQUENCERcommand == ’4’) 11 

( *SEQUENCERcoramand == ’6’) I : 

( *SEQUENCERcommand == ’A’) 1 I 

( *SEQUENCERcommand == ’a’) !! 

(♦SEQUENCERcommand == ’D’) 1 1 

(♦SEQUENCERcommand == ’d’) ! ! 

CONDITIONsequencer( ) ; 

if ( (*SEQUENCERcomraand == ’4’) 
PUSHmen u ( ) ; 

else 

if ( (*SEQUENCERcommand == ’C’ 
&& ( ! goback ) ) 

LDC Tmenu ( ) ; 

else 

if ( ( ( * SEQUENCERcommand == ’8’): 

(*SEQUENCERcommand == ’d’) !! 

( * SEQUENCERcommand == ’D’) !l 

NEEDPUSHmenu ( ) ; 

else 

if ( ( ( ♦SEQUENCERcommand == ’7’): 

NEEDLDCTraenu( ) ; 



’ 1 ’ ) ; I ( * SEQUENCERcommand -- ’3’V 

( ♦SEQUENCERcommand == ’5’) 

(♦SEQUENCERcommand == ’7’) 

(♦SEQUENCERcommand == ’ B’) 

( * SEQUENCERcommand == ’b’) :! 

(♦SEQUENCERcommand == ’F’) ! ! 

(♦SEQUENCERcommand == ’ f’j) 

&& ( ! goback ) > 



&& ( ! goback ) ) 



! I ♦SEQUENCERcommand == ’c’ ) 



( * SEQUENCERcommand == ’ B * ) : : 

(♦SEQUENCERcommand == ’f’):: 
(♦SEQUENCERcommand == ’ F’)) 

&& ( ! goback ) ) 



(♦SEQUENCERcommand == ’9’)) 
&& ( ! goback ! 



i f ( gob ack ) 

{ 

helpset = true; 
goback = false; 

} 

} 

whi le( helpset ) ; 

} /* procedure COMMAND select */ 
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Program Name: Utils. c 

Purpose: Source code for the Utilities module. 



^include " extern. h " 

^include " declare. h" 

#include <stdio.h> 

bad_choice( choice) 
char ^choice; 

{ 

puts("bad_ choice called. \0”); 
putchar(*choice) ; 
sleep (1); 

} 

docu (field, sub_set, choice) 
int field, sub _set; 
char ^choice; 

{ 

puts("docunew called\0”); 

/*This procedure sets the elements in an array called 
docu_word. Each element corresponds to a docu field (an 
int) which has a code in it indicating whether the docu 
field is being used. Unfortunately the docu fields don’t 
necessarily match the physical fields used by field_set. 

This was necessary since each physical field doesn’t always 
stand alone. Ex. the three physical fields for the branch 
address are always set together. So docu has only one field 
for that function. So the size of the docu_word array will 
be changing as new modules are added. At the end, it can be 
adjusted to try for some matching of names or numbers or 
both. */ 

/* The code for each element is: 

a # means which sub_set function was selected. 

-1 means this element is a selected docu field 
the values can be obtained from the 
m icro_word . 

0 means not set. */ 
switch( field) 

{ 

case 1: 
case 2 : 
case 3 : 
case 4 : 
case 5 : 
case 6 : 
case 7 : 
case 11: 
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-l; 



case 12: 
case 13: 
case 14: 
case 17 : 
case 18 : 
case 19: 
case 20 : 

docu_word[field-l] = 
break; 

case 8: /* The conditional testing function includes 

physical fields 8,9,13,15. This will be 
covered by docu field #8 (case 8 in the 
docu procedure). Sub_set will hold an 
integer representing the function chosen, 
(i.e. forced pass, forced fail, conditional 
testing.) In going backwards, a table or 
big switch will be needed to translate. */ 



docu_word[7] =sub_set; 
break; 
case 24: 

docu_word [ f ield-1 ] = sub_set; 

break; 

} /* end switch */ 

display_docu( ) ; 

} /* end docu */ 



field_set(field_cnt, sub_set , choice) 
int field_cnt,sub_set; 
char ^choice; 

/*There are 25 defined fields in the 29203 eval board 
microword, and several of them have multiple definitions. In 
this routine, we accept a pointer to the field and to the 
definition of the subset, and a pointer to a character which 
represents the actual choice. We generate a data structure 
which holds the choice and the actual bit pattern in the 
microword. */ 



{ 

char scrap [4 ] ; 
switch(field_cnt) 

{ 

case 1: / * regsel_fld, register address source * / 

octal_field(0, choice) ; 
break; 

case 2: /* ien_fld, 29203 instruction enable */ 

binary_field(3, choice) ; 
break; 
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case 3: /* oeyfld, 29203 output enable */ 

binary_field(4, choice) ; 
break ; 

case 4: /* source_fld, source field for the 29203. */ 

octal_field(5, choice) ; 
break; 

case 5: /* dest_fld, destination field. */ 

hex_field(8, choice) ; 
break; 

case 6: /* f unc t i on_f 1 d , function field. */ 

hex_field( 12, choice) ; 
break ; 

case 7: /* carryin_fld, carry-in mux control for the 

2904. */ 

dual_field( 16, choice) ; 
break ; 

case 8: /* I5I4_fld, bits I05_04, two MSB’s */ 

/* of conditional test codes. */ 

dual_field( 18, choice) ; 
break; 

case 9:/* I3_I0, bits I03_04 thru I00_04, four LSB’s*/ 



/* of conditional test codes. */ 

hex_field(20, choice) ; 
break; 

case 10: /* bits I05_04 thru I00_04 */ 

/* don’t know how to use this field yet. */ 

break ; 

case 11: /* ceu_fld, micro status enable bit */ 

binary_field(24, choice) ; 
break; 

case 12: /* cem_fld, macro status enable bit. */ 

binary_field(25, choice) ; 
break; 

case 13: /* cmden_fld, command enable field */ 

binary_field(26, choice) ; 
break ; 

case 14: /* shiften_fld, shift enable field. */ 

binary_field(27, choice) ; 
break; 
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case 15: /* comand_fld, command field. *' 

hex_field(28, choice) ; 
break; 

case 16: /* shift_fld, shift field. */ 

hex_field(28, choice) ; 
break; 

case 17: /* breakpt_fld, breakpoint field. */ 

binary_field(32, choice) ; 
break; 

case 18: /* notused_fld, this field not used. */ 

binary_field(33, choice) ; 
break; 

case 1 9 : / *msb_b r_ f 1 d , 2 MSB’s of branch addressfield */ 
/ * F i r s t test for conflicts by testing * / 

/*docu_word. If no conflicts, finish setting*/ 
/^branch address fields with recursive calls*/ 
/*to field_set with cases 20 and 21. *'' 

if (docu_word[19]==0) 

{ 

if (docu_word[18]==0) 

{ 

docu(field_cnt,no_sub, choice) ; 
dual_field(34, choice) ; 

field_set(mid_br_fld,no_sub,++choice) ; 
field_set(lsb_br_fld,no_sub,++choice) ; 

} 

else 

if ( docu_wor d [ 1 8 ] = = -1) 

{ 

put s ( " Branch Address is already set. \0 tf ); 
puts(”Do you want to change it?\0 M ); 
get s ( scrap) ; 
switch (*scrap) 

{ 

case ’YES’: 
case ’yes’: 
case ’ y ’ : 
case ’ Y’ : 

docu( 19, no_sub, choice) ; 
dual_field( 34, choice) ; 

field_set(mid_br_fld,no_sub,++choice) ; 
field_set(lsb_br_fld,no_sub,++choicej ; 
break; 
default : 
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} 



} 



printf ("OKAY--it 
break ; 



hasn ’ t been 

changed ! \n" ) : 



else 

puts ( ’’Garbage in the docu_word for #19, br. 

add . \ 0 " ) ; 



> 



else 



{ 

puts(”Can’t use this field for both register desig\0 M ); 
puts ( "nat ion AND branch address in the same raicro-\ 0” ) ; 
puts(”word. Right now it’s being used to select \0"); 
put s ( M reg is t er A and register B.\0"); 

} 

break ; 



case 20: /* mid_br_fld, 4 middle bits of branch 

address field */ 

hex_field(36, choice) ; 
break ; 



case 21: /* lsb_br_fld, 4 LSB’s of branch address 

f ield. */ 

hex_field(40, choice) ; 
break ; 



case 22: /* rega_fld, specify register A as source */ 

hex_field(36, choice) ; 
break ; 



case 23: /* regb_fld, specify register B as source */ 

hex_field(40 , choice) ; 
break ; 

case 24: / % seq_fld, sequencer code */ 

/* This case has been modified to allow changing of 
the seq code after it has already been set. */ 

i f ( docu_word [ 23 ] != 0) 

{ 

puts( tf The sequencer code is already set . \0 M ) ; 
puts( M Do you want to change it?\0 M ); 
get s ( scrap ) ; 
swi tch( *scrap) 

{ 



case 


’ YES ’ 


case 


’yes’ 


case 


’ Y ’ : 


case 


, y . . 
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branch address * 



switch(docu_word[23] ) 

{ 

case 2: / * clear previous 

string_erase(34,43) ; 
docu_word[ 18] = 0; 

string_erase(44,47) ; 
docu_wor d [ 23 ] = 0; 

break; 

case 4: /* clear br.addr. and cond. test */ 

string_erase(34,43) ; 
docu_word[ 18] =0; 

case 3: /* clear conditional test codes*/ 

switch(docu_word[7] ) 

{ 

case 4 : 
case 3 : 

string_erase( 18, 23) ; 
case 2: 

string_erase(28,31) ; 
case 1 : 

bit_erase(Cmd_En) ; 
docu_word [ 7 ] = 0 ; 

break; 

} 

case 1: /* clear sequencer code */ 

string_erase(44,47) ; 
docuwor d [ 23 ] = 0; 

break; 

} 

docu(field_cnt, sub_set , choice) ; 
hex_field(44, choice) ; 
break; 
default: 

puts("It hasn’t been changed. \0 TT ); 
break ; 

} /* end switch */ 

} /* end if */ 
else 

{ 

docu(field_cnt,sub_set, choice) ; 
hex_field(44, choice) ; 

} 

break; 

case 25: /* Conditional 

coordinated with shift codes, 
testing already set. If yes, 
entries. If no, go on to set 

if ( docu_word [ 7 ] != 0) 

{ 



Tests field — still not 
Check to see if conditional 
erase previous microword 
proper code. */ 
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puts( tT We got to docu_word[7] not = 0.\0 Tt ): 
switchf docu_word[7] ) 

{ 

case 3: /* erase logical fields 8 & 9 */ 

case 4: 

stringy erase( 18, 23) ; 

case 2: /* erase logical field 15, command_f Id */ 

string_erase(28,31) ; 

case 1: /* erase logical field 13, C ommand_en_ f 1 */ 

bit_erase(Cmd_En) ; 
docu_word [ 7 ] = 0 ; 

display_docu ( ) ; 
display_word( ) ; 
display_in_hex( ) ; 
break ; 
default: 

puts ( "Garbage in sub_set of case 25 in 

f i e 1 d _ s e t . \ 0 " ; ; 

break; 

} /* end switch */ 

} /* end if */ 

/* Set proper conditional testing bits. */ 
switch( sub_se t ) 

{ 

case 1: /* Forced Pass */ 

docu ( 8 , 1 , choice) ; 
bit_set(Cmd_En) ; 
break ; 

case 2: /* Forced Fail */ 

docu(8, 2, choice) ; 
bit_clear(Cmd_En) ; 

*scrap = 1 8 * ; 

field_set( command_f Id , no_sub , scrap) ; 
break; 

case 3: /* Single level testing */ 

bit_clear(Cmd_En) ; 

♦ scrap = ’ 9 * ; 

field_set( command_f Id ,no_sub, scrap); 
docu(S, 3 , choice) ; 

♦scrap = ’O’; 

field_set(I5I4_fld,no_sub, scrap) ; 
field_set(I3_I0_fld,no_sub, choice) ; 
break; 

case 4: / * Second Level Testing * / 

bit_clear(Crad_En) ; 

♦ scrap = ’ 9 9 ; 

field_set ( command_f Id ,no_sub, scrap); 
docu(8,4, choice) ; 

field_set(I3_I0_fld,no_sub, choice) ; 
break; 
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default : 

puts ( ’’Garbage in sub_set for field_set case 

25 . \0 

break; 

} /* end switch */ 

} /* end switch */ 

} /* end field_set */ 



binary_field(bit_n urn, choice) 

int bit_num; 
char ^choice; 

{ 

if ( ^choice == ’O’) 

bit_clear(bit_num) ; 

else if (^choice = = ‘l’) 

bit_set(bit_num) ; 



else 

bad_choice( choice) ; 

} 

dual_field(bit_num, choice) 

int b i t _ num ; 
char ^choice; 

{ 

switch (^choice) 

{ 

case ’O’: 

bit_clear(bit_num) ; 
bit__clear(bi t_nuin+ 1 ) ; 
break; 

case ’ 1 * : 

bit_clear(bit_num) ; 
bit_set(bit_num+l) ; 
break ; 

case ’ 2 ’ : 

bit_set(bit_nuni) ; 
bit_clear(bit_num+l) ; 
break ; 

case * 3 1 : 

bit_set(bit_num) ; 
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bit_set(bit_num+l) ; 
break; 

default : 

bad_cho i ce ( cho i ce ) ; 
break; 

} 

> 

octal_field(b i t_num , choice) 

int bit_num; 
char ^choice; 

{ 

switch (^choice) 

{ 

case ’O’; 

bit_clear(bit_num) ; 
bit_clear(b i t _num+ 1 ) ; 
bit_clear(bit_num+2) ; 
break; 
case ’ 1 ’ : 

bit_clear(bit_num) ; 
bit_clear(bit_nura+l) ; 
bit_set(b i t _num+2 ) ; 
break ; 
case ’ 2 ’ : 

bit_clear(bit_num) ; 
bi t_set (bit_num+l ) ; 
bit_clear(bit_nura+2) ; 
break ; 
case ’ 3 ’ ; 

bit_clear(bi t_num ) ; 
bit_set(bit_nura+l) ; 
bit_set(bit_num+2) ; 
break ; 
case ’ 4 5 : 

bit_set(bit_num) ; 
bit_clear(bit_num+l) ; 
bit_clear(bit_num+2) ; 
break; 
case * 5 ’ : 

bit_set(bi t _num ) ; 
bit_clear(bit_num+l) ; 
bit_set(bit_num+2) ; 
break; 
case * 6 ’ : 

bit_set(bit_nura) ; 
bit_set(bit_num+l) ; 
bit_clear(bit_num+2) ; 



156 



break: 
case ’ 7 ’ : 

bit_set^bit_num) ; 
bit_set(bit_num+l) ; 
bit_set(bit_num+2) ; 
break; 
default: 

bad_choice( choice) ; 
break; 

} 

> 

hex_field(bit_num, choice) 

in t b i t _num ; 
char ^choice; 



switch (^choice) 

{ 

case ’O’: 

bit_clear(bit_num) ; 
bit_clear(bit_num+l) ; 
bit_clear(bit__num + 2) ; 
bit_clear(bi t_num+3 ) ; 
break; 

case ’ 1 ’ ; 

bit_clear(bit_num) ; 
bit_clear(bit_num+l) ; 
bit_clear(bit_nura+2) ; 
bit_set(bit_num+3) ; 
break; 

case * 2 ’ : 

bit_clear(bit_num) ; 
bit_clear(bit_num+l) ; 
bit_set(bit_num+2) ; 
bit_clear(bit_num+3) ; 
break; 

case ’ 3 ’ : 

bit_clear(bit_num) ; 
bit_clear(bi t_num+ 1 ) ; 
bit_set(b i t_num+2 ) ; 
bit_set(bit_num+3) ; 
break ; 

case ’ 4 ’ : 

bit_clear(bit_num) ; 
bit_set (bit_num+l) ; 
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bit_clear(bit_num 4 -2) ; 
bit_clear(bit_num^3) ; 
break; 

case o : 

bit_clear(bit_num) ; 
bit_set(bit_num+l) ; 
bit_clear(bit_num+2) ; 
bit_set(bit_num+3) ; 
break ; 

case * 6 ’ : 

bit_clear(bit_nuin) ; 
bit__set(bit_nura + l) ; 
bit_set(bit_num+2) ; 
bit_clear(bit_num+3) ; 
break; 

case ’ 7 ’ : 

bit_clear(bit_num) ; 
bit_set(bit_num+l) ; 
bit_set(bit_num+2) ; 
bit_set(bit_num+3) ; 
break; 

case ’S’: 

bit_set(bit_num) ; 
bit_clear(bit_num+l) ; 
bit_clear(bit_num+2) ; 
bit_clear(bit_nuin+3) ; 
break; 

case ’ 9 9 : 

bit_set(bit_nura) ; 
bit_clear(bit_num+l) ; 
bit_clear(bit_nuin+2) ; 
bit_set(bit_num+3) ; 
break; 

case ’ a * : 

case ’ A * : 

bit_set(bit_num) ; 
bit_clear(bit_num+l) ; 
bit_set(bit_num+2) ; 
bit_clear(bit_num+3) ; 
break; 

case ’ b ’ : 

case ’ B 1 : 

bit_set(bit_num) ; 
bit_clear(b i t _num+ 1 ) ; 
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bit_set(bit_num+2) ; 
bit_set(bit_num+3) ; 
break; 

case ’ c ’ : 
case ’ C ’ : 

bit_set(bit_num) ; 
bit_set(bit_num+l) ; 
bit__clear(b it_num+2 ) ; 
bit__clear(bit_num+3) ; 
break; 

case ’ d 9 : 
case ’ D ’ : 

bit_set(bit_num) ; 
bit_set(bit_nura+l) ; 
bit_clear(bit_num+2) ; 
bit_set(bit_num+3) ; 
break; 

case 5 e ’ : 
case ’ E 5 : 

bit_set(bit_num) ; 
bit_set(b i t _num+l ) ; 
bit_set(bit_num+2) ; 
bit_clear(bit_num+3) ; 
break; 

case ’ f * : 
case 5 F ’ : 

bit_set(bit_num) ; 
bit_set(bit_num+l) ; 
bit_set(bit_nuin + 2) ; 
bit_set(bit_nuni+3) ; 
break; 

default : 

bad_choice(choice) ; 
break; 



> 



> 



display_word ( ) 

{ 

int i , j ; 

p r i n t f ( " " ) ; 

for ( j = 0 ; j <47 ; j = j + 16 ) 
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for ( i=j ; i < 16 + j ; i + + ) 

p u t c h a r ( m i c r o _ w o r d [ i ] ) ; 
putchar ( ’ ’ ) ; 

putchar ( ’ ’ ) ; 

} 

putchar ( ’ \n ’ ) ; 

} 

display_in_hex( ) 

{ 

int i , j ; 

printf ( " " ) ; 

for ( j = 0; j <47 ; j=j+16) 

{ 

for ( i=j; i < 16+j; i += 4) 

hex_display( &micro_word [ i ] ) 
p r i n t f ( " " ) ; 

} 

putchar ( ’ \n ’ ) ; 

} 

hex_display(pchar) 
char *pchar; 

{ 

int i, value; 
value = 0 ; 

for ( i = 0 ; i < 4 ; i + + ) 

{ 

switch (*(pchar+i)) 

{ 

case ’O’: 

value = 2*value; 
break ; 

case ’X’: 
case ’ 1 ’ : 

value = 1 + 2*value; 
break; 

case ’ ? ’ : 

putchar ( ’ ? ’ ) ; 

return; 

break; 

} 

} 

printf("%. lx", value) ; 

} 

display_docu( ) 
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i n t i : 

putchar ( ’ \n ’ ) ; 
for (i=0;i<24;i++) 

printf(”?id ” , docu_word [ i ] ) ; 
putchar( ’ \ n ’ ) ; 

} 



bit_set(i) 

i n t i ; 

{ 

in t error ; 
error = 0 ; 

micro_word [ i ] = *1*; 

return ( error) ; 



} 



b i t_c 1 ear ( i) 
in t i ; 

{ 

int error; 
error - 0 ; 

micro_word [ i ] = *0’; 

return ( error) ; 

> 

bit_erase(i) 
int i ; 

{ 

m i cro_wor d [ i ] = ’X’; 

} 

string_erase(i,j) 

int i , j ; 

{ 

for ( ; i < = j ; i + + ) 

micro_word [ i ] = ’X’; 

} 
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Program Name: Alumake 

Purpose: The Makefile used to compile the ALU module and 

its submodules. :Tne name alumake must be changed to 
makefile to be used. 



test: ALU.o 203. menus. o 2904.supp.o alutils.o 

cc ALU.o 203. menus. o 2904.supp.o alutils.o -o test2 
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Program Name: ALU.c 

Purpose: Source code for the ALU module. 



/* This is the draft of the 29203 section of the microcode 
generation system as of 27 Dec 1984. */ 

#include <stdio.h> 

#include " declare. h” 



char cmd_line[80] , *pcmd,micro_word[49] , *pmwd; 
int KEEPgoing, goback , docu^word [ 24 ] ; 

ma in ( ) 

{ 

char cont in [ 10 ] ; 

int i , 1 im_s r c , spc_src, rt_shift , left_shift , rama, ramb , helpset ; 
pcmd = cmd_line; 

for (i = 0; i<48;i++) micro^word [ i ] = * X* ; 

for (i-0; i<24;i++) docu_word[i] = 0; 

goback = false; 

do 

{ 

KEEPgoing = true; 
helpset = false ; 

rt_shift = false; 
left_shift = false; 
rama = false; 
ramb = false; 

am29203menu ( pcmd ) ; 
switch (*pcrad) 

{ 

case * h ’ : 
case ’ H * : 

helpset = true; 

KEEPgoing = false; 

puts( tf The 29203 alu is documented in chapter 5 of the 

AMD\0" ) : 

puts( ft data book. There are two types of functions it 

can\0 " ) ; 

put s ( " per f orm , regular functions and special 

f unc t i ons . \ 0 ” ) ; 

puts(”The rest of the decisions you must make are 

based on\0 ft ) ; 
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puts("which of these you chose. \Q"); 
puts(" Press enter to continue. \ 0 " ) ; 
gets ( con t in ) ; 
break; 

case ’ r ’ : 
case ’ R ’ : 

puts ( !, Do you really want to return to mas terraenu?\ 0" ) 
gets ( cont in ) ; 
switch(*contin) 

{ 

case ’ YES ’ : 
case ’yes’: 
case ’ Y ’ : 
case ’ y ’ : 

KEEPgoing = false; 
break; 
default: 

KEEPgoing = false; 
helpset = true; 
break ; 

} 

break ; 

case ’ b * : 
case ’ B * : 
do 

{ 

helpset = false; 

FUNCT IONmenu ( pcmd ) ; 

1 ira_src = false ; 
spc_src = false; 
swi t ch ( *pcmd ) 

{ 

case ’ h ’ : 
case ’ H J : 

helpset = true; 

puts ( tT The 29203 ALU functions are described on 

page 5-XXX\0 M ; 

puts(”of the AMD data book. \0 M ); 
puts(” Press enter to enter. \0 M ); 
ge ts ( cont in ) ; 
break; 

case ’ r ’ : 
case ’R’ : 

KEEPgoing = false; 
break; 
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case ’S’: / * codes 6 and 7 require limits on the 

source field . */ 

case ’ 7 ’ : 

lim_src = true; 



case 


’ i’ 


case 


> 2 > 


case 


’ 3 ’ 


case 


’4’ 


case 


’ 5 ’ 



field_set(func_fld,0,pcmd) ; 

docu(func_fld,0,pcmd); 

car ry i n_menu ( ) ; 

gets ( cmd_l ine) ; 

carry_set ( crad_line) ; 

break; 

case ’O’: /*F=high */ 

case ’8’: / * F = 1 o w * / 

/* codes 0 and 8 require limits on the source 
field. */ 
lira_src = true; 



case 


’9’ 


case 


’A’ 


case 


’a’ 


case 


’ B ’ 


case 


’b ’ 


case 


’C’ 


case 


’ c’ 


case 


’ D * 


case 


’ d’ 


cas e 


’ E ’ 


case 


’ e’ 


case 


’ F’ 


case 


. f . 



field_set(func_fld, 0 , pcmd) ; 
docu(func_fld,0,pcmd) ; 
break; 

default: 

helpset = true; 
puts( M Invalid input. \0"); 
puts( M Press enter to continue. \0") ; 
gets ( con t in ) ; 
break; 
j 

} /* end whi le */ 
while(helpset && KEEPgoing); 
if ( ! KEEPgoing) 

{ 

helpset = true; 
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} 

break ; 

case ’S’: 
case ’s’: 
do 

{ 

spc_src = false ; 
helpset = false ; 

SPEC I ALmenu ( pcmd ) ; 
swi t ch ( *pcmd) 

{ 

case ’H’: 
case 5 h ’ : 

helpset = true; 

puts ( "These special functions are described on 

page\0 " ) 

puts("5“XXX of the AMD data book.\0”); 
puts(” Press enter to continue. \0"); 
gets ( con t in ) ; 
break; 

case ’ R ’ : 
case ’ r 5 : 

KEEPgoing = false; 
break ; 



case ’O’: 
case ’ 1 ’ : 
case 5 2 ’ : 
case 5 3 9 : 
case 9 4 * : 
case 9 5 9 : 
case 9 6 ’ : 
case 9 7 9 : 
case ’ 8 ’ : 
case 9 9 ’ : 
case ’ a ’ : 
case 9 A ’ : 
case 9 b 5 : 
case ’ B ’ : 
case ’ c ’ : 
case 9 C 1 : 
case ’ d ’ : 
case ’ D ’ : 
case ’ e 9 : 
case ’ E ’ : 
case ’ f 9 : 
case 9 F 9 : 

spc_src = true; 
docu(dest_fld,0,pcmd) ; 
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field_set(dest_fld,0,pcmd) ; 

*pcmd - ’O’; 

field_set(func_fld,0,pcmd) ; 
break; 
case ’ M ’ : 
case ’ m ’ : 

spc_src = true; 
docu(dest_fld,0,pcmd) ; 

*pcmd = ’ 1 ’ ; 

field_set(dest_fld j O,pcmd) ; 

*pcmd = ’ 8 5 ; 

field_set(func_fld,0,pcmd) ; 
break ; 
case ’ Z ’ : 
case 1 z * : 

spc_src = true; 
docu(dest_fld, 0 , pcmd) ; 

*pcmd = ’ 9 ’ ; 

field_set(dest_fld, 0, pcmd) ; 

*pcmd = ’ 8 1 ; 

field_set(func_fld,0,pcmd) ; 
break; 

default: 

helpset = true; 

puts ( ” Illegal entry. \0 " ) ; 

puts( "Press enter to continue. \0" ); 

gets(contin) ; 

break ; 

> 

} /* end while */ 

whi le ( helpset && KEEPgoing); 

if ( ! KEEPgoing) 

{ 

helpset = true; 

} 

break; 

default: 

helpset = true; 

KEEPgoing = false; 

puts( "Illegal entry. \ 0 " ) ; 

puts( M Press enter to con t i nue . \ 0 " ) ; 

gets ( contin) ; 

break; 

} /* end main switch */ 



if ( 1 ira_s rc 

{ 



!= true && spc_src != true 

&& ( KEEPgoing) ) 
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helpset = true; 
while(helpset) 

{ 

helpset = false; 

srcstart: SOURCEraenu(cmd_line) ; 

switch (*cmd_line) 

/ 

i 

case ’ R ’ : 
case 5 r 5 : 

KEEPgoing = false; 
break ; 

case ’ H’ : 
case ’ h * : 

helpset = true; 

puts ( 11 Sources for ALU operations are 

described\0") 

puts ("on page 5-XXX of the AMD data book. 

\ 0 ") 

puts ("Type a C to con t inue . \0 " ) ; 

gets ( cont in ) ; 

break; 

case ’O’: 

ramb = true; 
case ’ 1 9 : 
case ’ 2 ’ : 

rama = true; 

field_set(src_fld, 0,cmd_line) ; 
docu(src_fld, 0, cmd_line) ; 
break ; 
case ’ 4 * : 

ramb = true; 
case ’ 5 ’ : 
case 5 6 ’ : 

field_set(src_fld, 0, cmd_line) ; 
docu(src_fld,0,cmd_line) ; 
break ; 
default: 

helpset = true; 

puts (" II legal entry, type a C to repeat. \0") 
ge t s ( cont in ) ; 
break ; 

} 

} /* end while */ 

if (IKEEPgoing) helpset = true; 



else if (lira_src == true && (KEEPgoing)) 

{ 

helpset = true ; 
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whi le( helpset ) 

{ 

helpset = false; 

srcl_start : SOURCElroenu(cmd_line) : 

switch (*cmd_line) 

{ 

case ’ H * : 
case ’ h * : 

helpset = true; 

puts ( ’’Because of the use of the 10 bit to 

indicate\0 TT ) ; 

puts(" special functions, there are limits to 

the \ 0 " ) : 

put s ( ,T sources for ALU operands. These limits 

ar e\ 0 ,f ) ; 

puts( ’’described on page 5-XXX of the AMD data 

book. \0") ; 

puts(”type a C to continue. \ 0 ” ) ; 
gets(contin) ; 
break ; 

case ’ R ’ : 
case ’ r ' : 

KEEPgoing = false; 
break; 

case ’ 2 ’ : 

rama = true; 
case ' 6 9 : 

field_set(src_fld, 0, cmd_line) ; 
docu(src_fld,0,cmd_line) ; 
break ; 

default : 

helpset = true; 

puts(” Illegal entry, type a C to repeat . \0 M ) ; 
gets ( con t in ) ; 
b r eak ; 



} 

} /* end While */ 
i f ( ! KEEPgo ing) helpset = true; 

} 

else if (KEEPgoing) 

{ 

src2_start: S0URCE2raenu(cmd_line) ; 

switch(*crad_line) 

{ 

case ’ H ’ : 
case ’ h 9 : 
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puts( M The special functions require that 

10=0X0" > ; 

put s ( M Ther ef or e the sources are limited to 

the\0") ; 

puts( M set on this menu. The sources are 

descr ibed\0" ) ; 

puts( M on page 5-XXX of the AMD data 

book . \0 " ) ; 

puts( M type a C to con t inue . \0 " ) ; 
gets(contin) ; 
break ; 

case * R 5 : 
case ’ r ’ : 
break; 

case ’O’: 

ramb = true; 
case ’ 1 ’ : 

raraa = true; 

field_set(src_fld,0,crad_line) ; 
docu(src_fld, 0, cmd_line) ; 
break; 
case * 4 * : 

ramb = true; 
case 1 5 * : 

field_set (src_fld, 0, cm d_ line) ; 
docu(src_fld,0,cmd_line) ; 
break; 
default: 

put s ( M I 1 legal entry, type a C to repeat . \0 rt ) ; 

gets ( con t in ) ; 

break; 

} 

} 

if (spc_src != true && (KEEPgoing)) 

{ 

helpset = true; 
wh i 1 e ( he lps e t ) 

{ 

he Ipset = false ; 

dest_start : DESTINATIONmenu(cmd_line) ; 

switch(*crad_line) 

{ 

case ’ H ’ : 
case * h ’ : 

helpset = true; 

puts(”This menu describes the destinations 

f or \ 0 " ) ; 
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puts(”the ALU result. They are 

puts( ,! page 5-XXX of the AMD data 

puts("type a C to con t in ue . \ 0 " ) ; 

gets ( cont in) ; 

break; 



case * R ’ : 
case ’ r * : 

KEEPgoing = false; 
break ; 

case ’O’: 
case ’ 1 * : 
case ’ 2 5 : 
case 5 3 * : 
case ’ 5 ’ : 

r t _sh i f t = true; 

field_set(dest_fld,0,cmd_line) ; 
docu(dest_fld, 0,cmd_line) ; 
break ; 
case ’ 8 ’ : 
case ’ 9 ’ : 
case ’ a ’ : 
case ’ A ’ : 
case ’ b ’ : 
case ’ B ’ : 
case ’ d ’ : 
case ’ D ’ : 

left_shift = true; 
field_set(dest__fld, 0, cmd_line) ; 
docu(dest_fld, 0, cmd_line) ; 
break; 



case 


’ 4 ’ 


case 


’6’ 


case 


’ 7 * 


case 


’ c’ 


case 


’ C ’ 


case 


’ e’ 


case 


’ E ’ 


case 


’ f ’ 


case 


’ F’ 



field_set(dest_fld, 0, crad_line) ; 
docu(dest_fld, 0, cmd_line) ; 





break ; 


case 


’ M ’ : 


case 


’ m ’ : 


case 


’ I’ : 


case 


’ i’ : 



*cmd_ line = * 0 ’ ; 



document ed 
on \ 0 ) : 

b o o k . \ 0 " ) ; 
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field_set(dest_fld,0,cmd_line) ; 
docu(dest_fld,0,crad_line) ; 

/ * Need to add things here!!!* 
break; 
default: 

helpset = true; 

pu t s ( " I 1 1 egal entry, type a C to 

repeat. \0 M ) ; 

get s ( con t in ) ; 
break; 

} 

} /* end while */ 
i f ( ! KEEPgo i n g ) helpset = true; 

} 

if (rt_shift == true && (KEEPgoing)) 

{ 

shift 2_menu ( ) ; 
gets ( cmd_l ine) ; 

if ( sh i f t_set ( cmd_ 1 i ne ) ) goto dest_start; 
bit_clear( 27 ) ; 

} 

if (left_shift == true && (KEEPgoing)) 

{ 

shi f 1 3_menu ( ) ; 
get s ( crad_ line) ; 

if ( shi f t_s et ( cmd_ 1 i ne ) ) goto dest_start; 
bit_clear(27); /* the shift enable for the 2904. */ 

J 

if (KEEPgoing) 

{ 

ENABLEmenu(cmd_line,contin) ; 
if (*cmd_line == ’Y’ 1 I *cmd_line = = ’y’) 

*cmd_line = ’O’; 
else 

*cmd_line = ’ 1 ’ ; 

field_set(ien_fld,0,cmd_line) ; 

if (*contin == ’Y’ ! ! *contin == ’y’) 

*contin = ’O’; 
else 

*cont in = ’ 1 ’ ; 

field_set(oey_fld,0,contin) ; 

} 

if (raraa == true ! 1 ramb == true && (KEEPgoing)) 

{ 

REG ISTERmenu ( cmd_ 1 ine ) ; 
field_set(reg_src,0,cmd_line) ; 
docu(reg_src,0,cmd_line) ; 
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} 



if (rama == true && (' KEEPgoing ) > 

{ 

RAMAroenu(cmd_line) ; 
switch (*cmd_line) 

{ 

case ’ H’ : 
case ’ h ’ : 

puts("This menu describes the register 

selections for\0" 

puts( M the ALU. They are documented on\0 tf ); 
puts(”page 5-XXX of the AMD data book.\0"); 
puts( M type a C to continue. \0” ) : 
ge t s ( con t in ) ; 
break; 



case ’ R ’ : 
case ’ r ’ : 
break; 

case ’O’: 
case ’ 1 ’ : 
case ’ 2 ’ : 
case’S’: 
case ’ 4 ’ : 
case ’ 5 ’ : 
case ’ 6 ’ : 
case ’ 7 ’ : 
case ’ 8 ’ : 
case ’ 9 ’ : 
case ’ a ’ : 
case ’ A ’ : 
case ’ b ’ : 
case ’ B ’ : 
case ’ c ’ : 
case ’ C ’ : 
case ’ d ’ : 
case ’ D ’ : 
case ’ e ’ : 
case ’ E ’ : 
case ’ f ’ : 
case ’ F ’ : 

field_set(rega_fld,0,crad_line) ; 
docu(rega_fld, 0, crad_line) ; 
break; 

} 

} 

if (ramb true && (KEEPgoing)) 

{ 
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RAM B menu ( crad_ 1 ine ) ; 
switch ( *cmd_l ine ) 

{ 

case ’ H * : 
case * h * : 

puts( M This menu describes the register 

selections f o r \ 0 " ) 
puts( ,r the ALU, They are documented on\0 M ) 
puts(”page 5-XXX of the AMD data book.\0") 
puts(”type a C to con t i nue . \ 0 " ) ; 
ge t s ( con t in ) ; 
break; 



case 


’R* 


; 


case 


’ r ’ 




b reak 


case 


’ 0 ’ 




case 


’ 1 ’ 




case 


’ 2 ’ 




case 


’ 3 ’ 




case 


’ 4 ’ 




case 


’5’ 




case 


’6’ 




case 


’7’ 




case 


’8’ 




case 


’9’ 




case 


’a’ 




case 


’A’ 




case 


’b ’ 




case 


’ B ’ 




case 


’c’ 




case 


’C’ 




case 


’ d’ 




case 


’ D ’ 




case 


’ e’ 




case 


’ E ’ 




case 


’ f ’ 




case 


* F* 





field_set(regb_fld,0,cmd_line) ; 
docu( regb_fld, 0, crad_line) ; 
break; 

} 

} 

} 

whi le ( he lpset I I KEEPgoing); 
ex i t ( ) ; 

} /* the end of 29203master */ 
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Program Name: Alutils.c 

Purpose: Source code for Utilities module which is compiled 

with the ALU module. 



^include 

#include 

#include 



<stdio. h> 
"declare. h" 
"extern. h n 



docu( field, sub_set , choice) 

int field, sub _set; 
char ^choice; 

{ 

puts("docu called\0"); 
sleep ( 2 ) ; 

} 

bad_choice( choice) 

char ^choice; 

{ 

puts( rt bad_choice called. \0 ” ) ; 
put char ( ^choice) ; 
sleep ( 2 ) ; 

} 



field_set( field_cnt , sub_set , choice) 

int field_cnt,sub_set; 

char ^choice; 

/ * There are 13 defined fields in the 29203 eval board 
microword, and several of them have multiple definitions. 

In this routine, we accept a pointer to the field and to the 
definition of the subset, and a pointer to a character which 
represents the actual choice. We generate a data structure 
which holds the choice and the actual bit pattern in the 
microword. */ 

{ 

switch (field_cnt) 

{ 

case 1: / * regsel_fld, register address source * / 

octal_field(0 , choice) ; 
docu ( 1 , 0 , choice) ; 
break; 
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case 2: /* ien_fld, 29203 instruction enable */ 

binary_field(3 , choice) ; 
docu(2,0, choice) ; 
break : 

case 3: /* oey_fld, 29203 output enable */ 

binary_f i e 1 d ( 4 , choice) ; 
docu(3, 0, choice) ; 
break; 

case 4: /* source_fld, source field for the 29203. */ 

octal_field(5, choice) ; 
docu(4,0, choice) ; 
break; 

case 5: /* dest_fld, destination field. */ 

hex_field(8, choice) ; 
docu(5,0, choice) ; 
break ; 

case 6: /* f unc t i on_ f 1 d , function field */ 

hex_field(12, choice) ; 
docuf 6,0, choice) ; 
break; 

case 7: /* car ry i n_ f 1 d , carry-in mux control for the 

2904 */ 

dual_field( 16, choice) ; 
docu(7,0, choice) ; 
break; 

case 8 : /*I5I4_f Id , bits I05_04 and I04_04, two MSB’s*/ 
/* of conditional test codes. */ 

dual_field(18, choice) ; 
docu(8, 0, choice) ; 
break; 

case 9:/*l3_I0, bits I03_04 thru I00_04, four LSB’s */ 
/* of conditional test codes. */ 

hex_field(20, choice) ; 
docu(9, 0, choice) ; 
break; 

case 10: /* bits I05_04 thru I00_04 */ 

/* don’t know how to use this field yet */ 
docu(10,0, choice); 
break; 

case 11: /* ceu_fld, micro status enable bit */ 

binary_field(24, choice) ; 
docu(ll,0, choice) ; 
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break; 



case 12: /* cerafld, macro status enable bit */ 

binary_field( 25, choice; ; 
docu( 12, 0, choice) ; 
b reak ; 

case 13: /% craden_fld, command enable field */ 

binary_field( 26, choice) ; 
docu( 13, 0, choice) ; 
break; 

case 14: /* shiften_fld, shift enable field */ 

binary_field(27 , choice) ; 
docu( 14, 0, choice) ; 
break; 

case 15: /* comraand_fld, command field */ 

hex_field(28, choice) ; 
docu( 15, 0, choice) ; 
break; 

case 16: /* shift_fld, shift field */ 

hex_field(28, choice) ; 
docu( 16, 0, choice) ; 
break ; 

case 17: / * breakpt_fld, breakpoint bit * / 

binary_field(32, choice) ; 
docuf 17,0, choice) ; 
break ; 

case 18: /* not used_f Id , this field is not used */ 

binary_field(33, choice) ; 
docu(18, 0, choice) ; 
break ; 

case 19: /* msb_br_fld, 2 MSB’s of branch address 

field * 

dual_field( 34, choice) ; 
docu(19,0, choice) ; 
break; 

case 20: /* mid_br_fld, 4 middle bits of branch 

address field * 

hex_field(36, choice) ; 
docu(20,0, choice) ; 
break ; 

case 21: /* lsb_br_fld, 4 LSB’s of branch address 

f i -e 1 d % f 
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hex_field(40 , choice) ; 
docu(21 , 0, choice) ; 
break; 

case 22: /* rega_fld, specify register A as source */ 

hex_field(36, choice) ; 
docu(22, 0, choice) ; 
break; 

case 23: /* regb_fld, specify register B as source */ 

hex__field(40, choice); . 
docu(23, 0, choice) ; 
break; 

case 24: /* seq_fld, sequencer code */ 

hex_field(44, choice) ; 
docu(24,0, choice) ; 
break; 

} 



} 



binary_field(bit_num, choice) 

int bit_num; 
char ^choice; 

{ 

if ( ^choice == ’O’) 

bit_clear(bit_nura) ; 

else if (^choice = = ’1’) 

bit_set(bit_nura) ; 



else 

bad_choice ( choice ) ; 



dual_field(bit_num, choice) 

int bit_num; 
char ^choice; 

{ 

switch (^choice) 

{ 

case ’O’: 

bit_clear(bit_nura) ; 
b i t_c 1 ear ( b i t_num+ 1 ) ; 
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break; 



case * 1 * : 

bit_clear(bit_num) ; 
bit_set(bit_num+l) ; 
break; 

case * 2 * : 

bit_set(bit_num) ; 
bit_clear(b i t_num+ 1 ) ; 
break; 

case * 3 9 : 

bit_set(bit_nura) ; 
bit_set(bit_num+l) ; 
break; 

default : 

bad_choice( choice) ; 
break; 

} 

> 

octal_f i el d ( b i t_num , choice) 

int bit_nuin; 
char ^choice; 

{ 

switch (^choice) 

{ 

case ’ 0 9 : 

bit_clear(bit_num) ; 
bit_clear(bi t _nuin+ 1 ) ; 
b i t _c lear ( b i t _nuin+2 ) ; 
break ; 
case ’ 1 1 : 

bit_clear(bit_nura) ; 
bit_clear(bit_num+l) ; 
bit_set(bit_num+2) ; 
break; 
case 9 2 9 : 

bit_clear(bit_num) ; 
bit_set(bit_num+l) ; 
bit_clear(bit_num+2) ; 
break; 
case * 3 * : 

’ bit_clear(bit_num) ; 
bit_set(bit_num+l) ; 
bit_set(bit_num+2) ; 
break ; 
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case ’ 4 5 : 

bit_set( bit_num) ; 
bit_clear(bit_num+l) ; 
bit_clear(bit_num+2) ; 
break; 
case ’ 5 * : 

bit_set(bit_nuni) ; 
bit_clear(bi t_num+ 1 ) ; 
bit_set(bit_num+2) ; 
break; 
case ’ 6 ’ : 

bit_set(bit_num) ; 
bit_set(bit_num+l) ; 
bit_clear(bit_num+2) ; 
break ; 
case ’ 7 ’ : 

bit_set(bit_num) ; 
bit_set(bit_num+l) ; 
bit_set(bit_num+2) ; 
break ; 
default: 

bad_choice( choice) ; 
break; 

} 

> 

hex_field(bi t __num , choice) 

int b i t_nura; 
char ^choice; 

{ 

switch (^choice) 

{ 

case ’O’: 

bit_clear(bit_num) ; 
bit_clear(bit_num+l) ; 
bit__clear(bit_num + 2) ; 
bit_clear(bi t _num+3 ) ; 
break ; 

case ’ 1 ’ : 

bit_clear(bit_num) ; 
bit_clear(bit_num+l) ; 
bit_clear(bit_num+2) ; 
bit__set(bi t_num+3 ) ; 
break; 

case ’ 2 ’ : 

bit_clear(bit_num) ; 
bit_clear(bi t_num+ 1 ) ; 
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bit_set(bit_num+2) ; 
b i t _c 1 ear ( b i t _num + 3 ) ; 
break; 

case ’ 3 ’ : 

bit_clear(bit_num) ; 
bit_clear(bit_num+l) ; 
bit_set(bit_num+2) ; 
bit_set(bit_num+3) ; 
break ; 

case ’ 4 9 : 

bit_clear(bit_num) ; 
bit_set(bit_num+l) ; 
bit_clear(bit_num+2) ; 
bit_clear(bit_num+3) ; 
break ; 

case ’ 5 ’ : 

bit_clear(bit_num) ; 
bit_set(b i t _num+ 1 ) ; 
bit_clear(bit_num+2) ; 
bit_set(bit_num+3) ; 
break; 

case ’ 6 9 : 

bit_clear(bit_num) ; 
bit_set (bit_nura+l ) ; 
bit_set(bit_num+2) ; 
bit_clear(b i t_num+3 ) ; 
break; 

case * 7 ’ : 

bit_clear(bit_num) ; 
bit_set(bit_num'+-l) ; 
bit_set(bit_num+2) ; 
bit_set(bit_num+3) ; 
break ; 

case 9 8 * : 

bit_set(bit_nuin) ; 
bit_clear(bit_num+l) ; 
bit_clear(bit_num+2) ; 
bit_clear(bit_num+3) ; 
break ; 

case ’ 9 * : 

bit_set(bit_num) ; 
bit_clear(bit_num+l) ; 
bit_clear(bit_num+2) ; 
bit_set(bit_num+3) ; 
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break; 



case , A ’ : 
case ’ a ’ : 

bit_set(bit_nura) ; 
bit_clear(bit_num+l) ; 
bit_set(bit_num+2) ; 
bit_clear ( b i t _num+3 ) ; 
break ; 

case * B * : 
case ’ b * : 

bit_set(bit_num) ; 
bit_clear(bit_nura+l) ; 
bit_set(bit_num+2) ; 
bit_set(bit_num+3) ; 
break; 

case * C * : 
case * c * : 

bit_set(bit_num) ; 
bit_set(b i t_nuin+ 1 ) ; 
bit_clear(bit_num+2) ; 
bit_clear(bit_num+3) ; 
break; 

case * D ’ : 
case ’ d ’ : 

bit_set(bit_num) ; 
bit_set(bit_num+l) ; 
bit_clear(bit_nura+2) ; 
bit_set (b i t_num+3 ) ; 
break; 

case * E * : 
case * e * : 

bit_set(bit_num) ; 
bit_set(bit_num+l) ; 
bit_set(bi t_num+2 ) ; 
bit_clear(bit_nuin + 3) ; 
break ; 

case * F * : 
case * f * : 

bit_set(bit_nuin) ; 
bit_set(bi t_num+ 1 ) ; 
bit_set(bit_num+2) ; 
bit_set(bit_num+3) ; 
break; 

def aul t : 
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} 



bad_choice( choice ) ; 
break; 



display_word( ) 

{ 

int i , j ; 

printf(" ”); 

for ( j = 0 ; j <47 ; j = j + 16 ) 

{ 

for ( i=j ; i < 16+j ; i++) 

putchar(micro_word[ i] ) ; 
putchar(’ ’); 
put char ( ’ ’ ) ; 

} 

putchar ( ’ \n ’ ) ; 

} 

display_in_hex( ) 

{ 

int i , j ; 

printf ( " ”); 

for ( j = 0 ; j < 4 7 ; j = j + 1 6 ) 

{ 

for ( i=j; i < 16+j; i += 4) 

hex_display( &micro_word [ i ] ) 
printf(" "); 

} 

putchar(’\n’); 

} 

hex_display( pchar ) 
char tpchar; 

{ 

int i , value ; 
value = 0 ; 

for ( i=0; i < 4; i++ ) 

{ 

switch ( * ( pchar+ i ) ) 

{ 

case ’O’: 

value = 2*value ; 
break ; 

case ’X’: 
case ’ 1 ’ : 
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value = 1 + 2*value; 
b r eak ; 



case ’ ? ’ : 

put char (’?’); 
return; 
break ; 

} 

} 

printf("%. lx" .value) ; 

} 



bit_set ( i ) 

i nt i ; 

r 

\ 

int error; 

error = 0 ; 

switch (raicro_word[ij) 

{ 

case ’X’: /* Don’t care, therefore set it!*/ 

inicro_word [ i ] = *1’; 

break ; 

case ’1’: /* Already set, therefore OK. */ 

b reak ; 

case ’O’: /* Cleared, therefore an error. */ 

micro_word [ i ] = 

error = 1 ; 
break; 

case /* Already in the error state. */ 

break; 

default: /* Garbage in the microword! */ 

puts ( Tt Garbage in the 

microword! ! ! !\n \ 0 T * ; : 

sleep ( 2 ) ; 
b reak ; 

} 

return ( error) ; 

> 



bit_clear ( i ) 
int i ; 

{ 

int error ; 
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error = 0 ; 

switch (micro_word[i] ) 

/ 

i 

case ’X’:/* Don’t care, therefore clear it!*/ 
raicro_word [ i ] = ’O’; 

break; 

case ’O’: /* Already clear, therefore OK. */ 

break ; 

case /* set, therefore an error. */ 

mi cro_word [ i ] - 

error = 1 ; 
break; 

case / * Already in the error state. * / 

break; 

default: /* Garbage in the microword! */ 

puts ("Garbage in the 

raicr oword ! ! ! ! \ n\ 0 " ) ; 

s 1 eep ( 2) ; 
break; 

} 

return (error); 

} 

bit_erase( i) 
in t i ; 

{ 

mi cro_word [ i ] = ’X’; 

} 
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Program Name: 203. menus. c 

Purpose: Source code for the menus used in the ALU module. 



#define erase_screen "\033[2J\033[0:0H" 

#include <stdio.h> 



/* */ 

/* AM29203 MENU PROCEDURES */ 

/ * * / 

ara29203raenu(am29203select) 
char *am29203select ; 



puts(erase_screen) ; 

puts( "\t\t\tMASTER AM29203 ALU MENU\n\n\0" ) ; 
display_word( ) ; 
display_in_hex( ) ; 

puts("The X s indicate bits which are not yet defined\0"): 
puts("The defaults for the AM 2920 3 ALU are:\0"); 
puts("\tRegister Address Select - bits 47-45 - A,B 

pipeline = 111 \ 0 ” : : 

put s ( " \ t In s t r uc t i on Enable - bit 44 - Disable = 1 \ 0 " ; 

puts("\tOutput Enable - bit 43 - Disable = 1\0"); 
puts ( "\tSource - bits 42-40 - DAQ = 111\0"); 
put s ( " \ tDes t inat ion - bits 39-36 - YBUS = 1111\0"); 
puts("\tALU Function - bits 35-32 - OR = llll\n\0"); 
puts("What do you want to do next?\0"); 
puts("\ttype a B to choose ALU FUNCT IONS\0 ” ) ; 
puts("\t\tS to choose SPECIAL FUNCTIONS\0 " ) ; 
puts(”\t\tH for HELP with this program\0 " ) ; 
puts("\t\tR to RETURN to higher level\0”); 
gets(am29203select) ; 

} /* procedure am29203roenu */ 



FUNCT I 0Nmenu( FUNCTIONS elect ) 
char *FUNCTIONselect ; 



puts ( erase_screen ) ; 

puts("\t\t AM292 03 ALU BASIC FUNCTION SELECT\n\0") ; 
puts ( "Enter the value corresponding to the function you 

wish to perf orm\0 " ) ; 
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} 



puts(”\t\tO 
p u t s ( " \ t \ 1 1 
put s ( " \ t \ t 2 
p u t s ( " \ t \ t 3 
puts("\t\t4 
puts(’’\t\t5 
puts("\t\t6 
puts("\t\t7 
puts("\t\t8 
puts("\t\t9 
puts("\t\tA 
puts("\t\tB 
puts("\t\tC 
puts(" \t\tD 
puts("\t\tE 
puts("\t\tF 
puts(”\t\tH 
puts(”\t\tR 



F = H igh\0" ) ; 

F=S-R-1+ Carry ln\0” ) ; 
F=R-S-1+ Carry ln\0" ) ; 

R + S + Carry ln\0") ; 

S + Carry ln\0” ) ; 

(NOT S ) + Carry ln\0” ) ; 

R + Carry I n \ 0 ” ) ; 

F = (NOT R) + Carry ln\0"); 

F = Low\0" ) ; 

F = (NOT R) AND S\0") ; 

F = R EXCLUSIVE OR S\0" ) ; 

F = R EXCLUSIVE OR S\0") ; 

F = R AND S\0” ) ; 

F = R NOR S\0") ; 

F = R NAND S\0" ) ; 

F = R OR S\0" ) ; 

for HELP with this pr ogr am\0 " ) ; 
to RETURN to higher level\0"); 



gets (FUNCTIONS elect) ; 



/* procedure FUNCTIONselect */ 



SPECIALmenu(SPECIALselect) 



{ 

puts(erase_screen) ; 

puts ("\t\t AM 29203 ALU SPECIAL FUNCTION MENU\n\0"); 
puts("Enter the value corresponding to the function you wish 

to perf orm\0 ” ) ; 



puts ( " 
puts ( ’’ 
puts ( " 
p u t s ( " 
put s ( " 
puts ( " 
puts ( 



0 Unsigned mul t ip 1 y\0 " ) ; 

1 BCD to Binary Conversion\0"); 

M Mu 1 1 i p r ec is ion BCD to Binary Convers ion\0" ) ; 

2 Two’s Complement Mu 1 1 ip 1 y\0 ” ) ; 

3 Decrement by 1 or 2\0"); 

4 Increment by 1 or 2\0"); 

5 S i gn/Magn i t ude to Two’s Complement 

ConversionXO”) ; 



puts ( 
p u t s ( " 
puts ( 
puts ( 
p u t s ( " 
puts ( ” 
p u t s ( 
puts(" 
p u t s ( ” 

puts ( 



6 Two’s Complement Mult iply\0” ) ; 

7 BCD Divide by 2\0") ; 

8 Single Length Mormalize\0") ; 

9 Binary to BCD Conversion\0"); 

Z Multiprecision Binary to BCD Convers ion\0" ; ; 
A Double Length Normalize; First D i v is i on\ 0 ” ) ; 
B BCD Add\0 ” ) ; 

C Two’s Complement Divide\0"); 

D BCD Subtract F=R-S-1+ Carry In 

B C D \ 0 " ) ; 

E Two’s Complement Divide Correction and 

Remai nde r \ 0 " ) ; 
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puts(" F BCD Subtract F = S- R-1 + Carry In 

BCD \ 0 " ) 

puts(" H for HELP with this menu\0 M ) ; 

puts( M R to RETURN to higher level\0"); 

gets(SPECIALselect) ; 

} /* procedure S PEC I ALs e 1 ec t */ 



SOURCEmenu(SOURCEselect) 
char *SOURCEselect; 



puts(erase_screen) 



puts ( ’ 
puts ( * 
puts(’ 
put s ( f 
putsf’ 
put s ( f 
pu t s ( f 
puts ( 
puts(’ 
put s ( ’ 
put s ( ’ 
pu t s ( 
puts(* 



\t\t\t AM29203 ALU SOURCE MENU\n\0”); 

The source control default is DAQ\n\0”) 



Operand R Operand S 

Enter a 0 RAMA RAMB 

1 RAMA Direct B 

2 RAMA Q Register 

4 Direct A RAMB 

5 Direct A DirectB 

6 Direct A Q Register 

I Instruction Register\0" ); 

P Pipeline Register \ 0 ” ) ; 

H for H with this program\0 M ) 

R to RETURN to higher level\0 



Mneraon i c \ 0 
RAMAB\0") ; 
RAM AD B \ 0 ” > 
RAMAQ\ 0 " ) ; 
DARAMB\0” ) 
D ADB\0 ” ? ; 
DAQ\O tT ) ; 



gets(SOURCEselect) ; 

/* procedure SOURCEmenu %/ 



SOURCE lmenu( SOURCE 1 sel ect ) 
char *SOURCElselect; 



puts ( erase_screen) ; 

puts ( H \t\ t\t AM292 0 3 ALU SOURCE MENU\n\O ft ); 

puts( M You have chosen one of the following AM 29203 ALU 

functions: \ 0 " 1 

puts( tT \tF = High\0 M ) ; 
puts( tT \tF = R + Carry In\0 tr ); 
puts( f, \tF + (NOT R) + Carry ln\0”); 
puts ( Tt \ t F = LOW\n\0 M ) ; 

puts( M For these functions, the only allowed AM29203 ALU 

Sources are: \n\0 M ) 

puts(” \tOperand R Operand S Mnemonic\n\0 Tt ); 

puts( Tt \tRAMA Q Register RAMAQ\0 rt ); 

puts ( ”\tDirect A Q Register DAQ\n\0 M ); 
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puts ("Type a 2 for RAMAQXO”); 
puts("\t6 for DAQ\0"); 

puts("\tH for HELP with this programX.O" ) ; 
puts("\tR to RETURN to a higher levelXO"); 
gets(SOURCElselect) ; 

} /* procedure SOURCElmenu */ 



SOURCE 2menu( SOURCE 2 select ) 
char *SOURCE2select ; 



pu t s ( e r as e_ screen ) ; 

puts( " \t\t\tAM29203 ALU SOURCE SELECT\n\0 " ) ; 
puts(" You have chosen an AM 29203 ALU Special 

Function XnX O' 
do you want to use\n\0") ; 



puts ( 
pu t s ( 
puts ( 
put s ( 
puts ( 
put s ( 
puts ( 
puts ( 



What sources 



Enter 



Operand R Operand S 

0 RAMA A RAM B 

1 RAM A DIRECT 

4 DIRECT A RAM A 

5 DIRECT A DIRECT 

H for HELP with 

R to RETURN to a 



Mnemon i c\0 " ) 
RAMAB\0 " > : 
B RAMAD B\ 0 " ) 
DARAMBXO") 
B DADB\0") 

this menu\0"); 
higher level\0"); 



gets ( SOURCE2select ) 



} /* procedure SOURCE2menu */ 



DESTINATIONmenu( DESTINATIONS elect) 
char *DESTINATIONselect ; 

{ 

puts ( erase_screen ) ; 

puts( "\t\t\t AM29203 ALU DESTINATION MENUXnXO"); 



p u t s ( 




Enter the 


value corresponding to the 








destination you desireXO 


puts ( 


0 


RAMDA - 


F to RAM, Arithmetic Down Shift \0 


puts ( " 


1 


RAMDL - 


F to RAM, Logical Down Shift\0"); 


puts(" 


2 


RAMQDA - 


Double Precision Arithmetic Down 








Shi f t \0 


puts ( " 


3 


RAMQDL - 


Double Precision Logical Down 








Shi f t\0 


put s ( " 


4 


RAM - F 


to RAM with par i ty\0 M> ) ; 


puts ( " 


5 


QD - F to Y, Down Shift Q\0"); 


puts ( " 


6 


LOADQ - 


F to Q with parity\0 n ); 


puts ( " 


7 


RAMQ - F 


to RAM with parity\0 M ); 
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} 



puts ( M 
put s( " 
puts ( M 



8 RAMUPA - F to RAM, Arithmetic Up Shift\0"); 

9 RAMUPL - F to RAM, Logical Up Shift\O v ); 

A RAMQUPA - Double Precision Arithmetic Up 

Shift' 0 



puts(" B RAMQUPL - Double Procision Logical Up 

Shift\0") 

puts ( C - F to Y on 1 y \ 0 ft ) ; 

puts ( D - F to Y, Up SHift Q\0"); 

puts ( E SIGNEXT - SIOO to Y(i)\0"); 

puts ( M F RAMEXT - F to Y, Sign extend LSB\0 ,f ); 

puts( M I Instruction Reg i s t e r \ 0 ft ) ; 

puts( M M Main Memory\0 M ); 

puts(” H for HELP with this program\0 M ) ; 

puts(" R to RETURN to higher level\0 M ); 

gets (DE ST I NATIONS elect ) ; 

/* procedure DESTINATIONraenu */ 



REGISTERraenu(REGISTERselect) 
char *REGISTERselect; 



{ 



} 



puts(erase_screen) ; 

puts ( tf \t\t\tAM29203 ALU REGISTER ADDRESS MENU\n\0 M ) ; 
puts( ,f The default source selection is Source A - 

p i p e 1 i n e , \ 0 f ‘ ; 

puts( Tf Source B - pipeline, Destination C - 

pipeline\n\0’M; 

puts( ” Enter the value corresponding to the register 

address \0") ; 



puts( tf you desire\0”) ; 
puts( M Source A 
puts( ft 0 Pipeline 
puts(” 1 Instruction 
puts ( ,f 2 Pipeline 
puts( ,T 3 Instruction 
puts( M 4 Pipeline 
puts(' f 5 Instruction 
puts( M 6 Pipeline 
puts( M 7 Instruction 
gets(REGISTERselect) ; 
/* procedure REGISTER 



Source B 
Pipel ine 
Pipeline 
Instruction 
Inst ruct ion 
Pipel ine 
Pipeline 
Instruction 
Instruct ion 

menu */ 



Destination C\0 M ); 
Pipel ine\0 M ) ; 
Pipeline\0 M ) ; 
Pipeline\0 M ; : 
Pipeline \ 0 " ) ; 
Instruction \ 0 ” ) ; 
Instruction \ 0 ) ; 

lnstruction\0 ,f ) ; 
lnstruction\0 ,f ) ; 



DIRECTraenu(constantl , constant2) 
char ^constant 1 , *constant2; 

{ 

puts ( erase_screen ) ; 
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} 



puts(" \t\t\t AM2 920 3 ALU DIRECT SOURCE MENU\n\0"): 
puts( M You have chosen an ALU function, source, or 

destination which 0" 1 : 

puts ( M requires a constant or Ra and Rb to be 

entered into the\0 M ; 

puts(" the branch address field of the 

microinstruct ion\n\0 M ) ; 

puts(" This constant or the RAM register 

designations is 1\0"); 



puts( M byte in length\0"); 

puts(" Please enter the constant or the RAM register 

d e s i g' n a t i o n \ 0 " 

puts( M Enter a H for HELP with this pr ogr am \ 0 M ) : 

puts( M Enter a R to RETURN to a higher level\0 M ): 

gets (constantl, constant2) ; 

/* procedure DIRECT menu */ 



ENAB LEmenu ( INSTRUCTIONse lec t , OUTPUTS e 1 ec t ) 
char * INSTRUCT IONselect , *OUTPUTs e 1 ec t ; 

{ 

puts(erase_screen) ; 

puts("\t\tAM29203 ALU INSTRUCTION AND OUTPUT ENABLE 

MENU\n\ 0 ” ,i ; 

puts(" Do you want the ALU results to appear on the 

Y-bus ? \0 " ) ; 

p u t s ( " Type an Y for YES\0’’); 

puts(" Type a N for N0\n\n\n\0 " ) ; 

gets(OUTPUTselect) ; 

puts(" Do you want to change the contents of any ALU 

register\0"; ; 

puts ( " during this ALU operation?\n\0" ); 

puts(" Type an Y for YES\0"); 

puts(" Type an N for N0\0"); 

gets ( INSTRUCTIONS elect) ; 

} /* procedure ENABLEmenu */ 



RAMAmenu ( RAM As e 1 ec t ) 
char *RAMAselect; 



{ 



puts(erase_screen) ; 

puts( ”\t\tAM29203 ALU RAM A REGISTER SELECT\n\0 ” ) ; 
puts("\t Enter the value corresponding to the RAM A 

Register \0"); 



puts("\tyou wish to select\n\0"); 
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put s ( " \ t 
p u t s ( " \ t 
p u t s ( " \ t 
puts("\t 
puts ( "\ t 
puts("\t 
puts(”\t 
puts ( "\t 
put s ( " \ t 
puts("\t 
put s ( " \ t 
puts("\t 
puts("\t 
put s ( 
pu t s ( 
puts ( 
puts ( 
put s ( 



\t 

\t 

\t 

\t 

\t 



0 RAMA A Register 0\0"; 

1 RAMA A Register 1\0"); 

2 RAMA A Register 2\0") 

3 RAMA A Register 3\0") 

4 RAMA A Register 4\0") 

5 RAMA A Register 5\0"); 

6 RAMA A Register 6\0") 

7 RAMA A Register 7\0"); 

8 RAMA A Register 8\0”) 

9 RAMA A Register 9\0") 

A RAMA A Register A\0") 

B RAMA A Register B\0") 

C RAMA A Register C\0") 

D RAMA A Register D\0") 

E RAMA A Register E\0") 

F RAMA A Register F\0"); 

H for HELP with this menu\0"); 

R to RETURN to a higher level\0"); 



gets(RAMAselect) ; 

} /* procedure RAMAmenu */ 



RAMBmenu(RAMBselect) 
char *RAMBselect; 



put s ( eras escreen ) ; 

puts ( " \ t \ t \ t AM 2 9 2 0 3 ALU RAM B REGISTER SELECT\n\0" ) ; 
puts(”\t Enter the value corresponding to the RAM B 

Register \0 ” ) 

puts("\tyou wish to select\n\0") ; 



puts( "\t 


0 


RAM 


B 


Register 


0\0”) 


puts("\t 


1 


RAM 


B 


Register 


1\0”) 


puts("\t 


2 


RAM 


B 


Regi s t er 


2 \ 0 " ) 


puts("\t 


3 


RAM 


B 


Regi s t er 


3\0 " ) 


puts("\t 


4 


RAM 


B 


Register 


4\0 " ) 


p u t s ( " \ t 


5 


RAM 


B 


Register 


5\0") 


puts ( "\t 


6 


RAM 


B 


Register 


6\0”) 


puts(" \t 


7 


RAM 


B 


Register 


7 \ 0 ” ) 


p u t s ( " \ t 


8 


RAM 


B 


Register 


8\0 " ) 


put s ( " \ t 


9 


RAM 


B 


Register 


9\0 " ) 


puts("\t 


A 


RAM 


B 


Regi s t er 


A \ 0 " ) 


put s ( " \ t 


B 


RAM 


B 


Register 


B \ 0 ” ) 


puts("\t 


C 


RAM 


C 


Register 


C\0" ) 


put s ( " \ t 


D 


RAM 


B 


Register 


D\0 " ) 


puts ( "\t 


E 


RAM 


B 


Register 


E \ 0 " ) 


puts ( "\t 


F 


RAM 


B 


Register 


F \ 0 ” ) 


p u t s ( " \ t 


H 


for 


HELP with 


this m 



menu\ 0 " ) ; 

level\0") 
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gets(RAMBselect) ; 

/* procedure RAMBmenu */ 



Program Name: 2904.supp.c 

Purpose: Source code for the utilities used with the Alu module. 



/* This version of the 2904 code is included to allow 

the testing of other modules. The utilities have been 
removed, as has the main program portion. 13 July 1984. * 

/* This program will aid the 2900 system designer in the 
programming of a 2904 "glue" chip. */ 

/* This version is not as current as the utilities used 
with the Sequencer module. 27 Dec. 1984 */ 

/* This source is set up to work with the vtlOO from 
VAX/unix . */ 

#include <stdio.h> 

#define erase_screen "\033[2J\033[0;0H” /* vtlOO erase 

screen and home cursor * 

#define TRUE 1 

^define FALSE 0 

/* These defines relate to the 29203ET board, and 
should be contained in a routine to initialize them, rather 
than as defines. */ 



#de f i ne 


112 04 


16 


#def i ne 


111 04 


17 


#def ine 


110 04 


8 


#def i ne 


109 04 


28 


#def i ne 


1 08_04 


29 


#def i ne 


107 04 


30 


#def ine 


I06_04 


31 


#def i ne 


105 04 


18 


#def ine 


104 04 


19 


#def ine 


103 04 


20 


#def ine 


102 04 


21 


#def ine 


101 04 


22 


#def ine 


I00_04 


23 


#def i ne 


Ceu 04 


24 


#def ine 


CeM_04 


25 


#def ine 


Se_04 


27 


#def i ne 


Cmd_En 


26 


#def ine 


Crad_3 


28 


#def ine 


Cmd_2 


29 


#def i ne 


Cmd_l 


30 


#def ine 


Cmd 0 


31 
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/* Variable Declarations */ 

extern char crad_line[80] , *pcmd,micro_word[49] , *pmwd ; 



/* We need a static data structure which holds the 
different choices available for bits 15 to 10 of the 2904.*/ 

char *choices_04(n) /* return a pointer to the n-th choice*/ 
in t n ; 

{ 

static char ^choice [] = { 



"0X0XXX" , 


/* 


carry 


in = u carry 


, first choice -0 */ 




"0XX1XX" , 


/* 


carry 


in = u carry 


, second choice -1 */ 


"0 XXX IX" , 


/* 


carry 


in = u carry 


, third choice -2 * / 




"1X0XXX" , 


/* 


carry 


in = Macro carry, first choice -3*/ 


"1XX1XX" , 


/* 


carry 


in = Macro carry, second choice - 


4*/ 


"1XXX1X” , 


/* 


carry 


in = Macro carry, third choice -5 


*/ 


" 0 0 0 1 1 X ” , 


/* 


Load 


u 


register, retain overflow bit -6 


*/ 


"X1100X" , 


/* 


Load 


u 


reg, invert 


carry, first choice - 


7 * '' 


" 1 X 1 0 0 X " , 


/* 


Load 


u 


reg , invert 


carry, second choice - 


8* 


"XX010X" , 


/* 


Load 


u 


reg, immed. 


, first choice. -9 */ 




"X10XXX" , 


/* 


Load 


u 


reg, immed. 


, second choice. “10 


*/ 


"X1XX1X" , 


/* 


Load 


u 


reg, immed. 


, third choice. -11 * 




"X1X1XX" , 


/* 


Load 


u 


reg, immed. 


, fourth choice. -12 


*/ 


"1X0XXX" , 


/* 


Load 


u 


reg, immed. 


, fifth choice. -13 */ 


"1XXX1X" , 


/* 


Load 


u 


reg, immed. 


, sixth choice. -14 * 


/ 


"1XX1XX" , 


/* 


Load 


u 


reg, immed. 


, seventh choice. -15 


*/ 


"XX100X" , 


/* 


Load 


M 


reg, invert 


carry -16 */ 




"XXX11X" , 


/* 


Load 


M 


reg, immed, 


first choice -17 * / 




"XX1X1X" , 


/* 


Load 


M 


reg, immed, 


second choice -18 */ 




"XX11XX” , 


/* 


Load 


M 


reg, immed, 


third choice -19 */ 




"X10XXX" , 


/* 


Load 


M 


reg, immed, 


fourth choice -20 * / 




"1X0XXX" 


/* 


Load 


M 


reg, immed, 


fifth choice -21 */ 





}; 

return (choice [ n ] ) ; 

} 



/* Now we need a structure to manipulate this data. 

Each time we invoke a function with a choice, a pointer to 
that choice gets added to the list of such pointers. When 
we display or save a microword, we will search this list to 
find an entry which matches all of the chosen functions. */ 

dummy ( ) 

{ 

puts (’’Dummy ca 1 1 ed\ n\ n \ 0 " ) ; 

} 
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shif t2_menu ( ) 

{ 

puts(erase_screen) ; 

puts(’’You have chosen a down shift for this microword. 

There are\0 M ) ; 

puts(’’16 possible shift patterns, coded 0 thru F in 

bits 1 9 \ 0 ” ) ; 

puts("thru 16. Choose the shift pattern you desire from 

the\0") ; 

puts(” foil owing set : \0 H ) ; 



puts ( 


"\tzero 


= 


0 


-> 


RAMn , 


0 -> 


Qn\0 


" ^ • 

/ i 


pu t s ( 


" \ t one 


= 


1 


-> 


RAMn, 


1 -> 


Qn\0 


’’) : 


put s ( 


" \ t two 


= 


0 


~> 


RAMn, 


RAMO -> 


Me , 


Mn -> 

Q n \ 0 " ; ; 


put s ( 


"\tthree 


= 


1 


-> 


RAMn , 


RAMO -> 


Qn\ 0 


?? 4 . 


put s ( 


"\tfour 


= 


Me 


-> 


RAMn , 


RAMO -> 


Qn\0 


; 


puts ( 


"\tf ive 


= 


Mn 


-> 


RAMn, 


RAMO -> 


Qn\0 


") ; 


puts ( 


"\t six 




0 


-> 


RAMn , 


RAMO -> 


Qn\0 


") ; 


put s ( 


"\tseven 




0 


-> 


RAMn , 


RAMO -> 


Qn , 


QO - 
M c \ 0 ” ) ; 


puts ( 


"\teight 


— 


RAMO 




RAMn , 


1 

o 

o 


Qn , 


RAMO 

Mc\ 0 ” ) : 


put s ( 


"\tnine 


- 


Me 


-> 


RAMn, 


© 

0 

1 

\/ 


Qn , 


RAMO - 
Mc\ 0 " ) ; 


put s ( 


”\t 


A 


= 


RAMO 


-> 


RAMn , 


QO -> 


Qn\0 


”) ; 


puts ( 


"\t 


B 


= 


Ic 


-> 


RAMn , 


RAMO -> 


Qn\ 0 


t» A . 
) « 


p u t s ( 


”\t 


C 




Me 


-> 


RAMn , 


RAMO -> 


Qn , 


QO - > 
M c \ 0 " ) ; 


pu t s ( 


"\t 


D 


= 


QO 


-> 


RAMn, 


RAMO -> 


Qn , 


QO -> 
Mc\0 " ) ; 


puts ( 


”\t 


E 


= 


In exor 


IOvr -> 


RAMn, RAMO -> 


Q n \ 0 " ) ; 


puts ( 


”\t 


F 


- 


QO 


-> 


RAMn , 


RAMO -> 


Qn\ 0 


”) ; 



puts("\t H to get help with this procedure\0"); 
puts(”\t N to back up one frame. \0"); 

} 



shif t3_menu( ) 

{ 

puts(erase_screen) ; 

puts (’’You have chosen an up shift for this microword. 

There are\0”) ; 

puts(”16 possible shift patterns, coded 0 thru F in 

bits I9\0” ) ; 

puts(”thru 16. Choose the shift pattern you desire from 

t he \ 0 ’’ ) ; 



puts ( 


’’following 


s e t : \ 0 ” ) ; 






put s ( 


"\tzero = 


0 


-> RAMO, 


0 -> QO, 


RAMn -> 
Mc\ 0 " ) ; 


put s ( 


”\t one = 


1 


-> RAMO, 


1 -> QO, 


RAMn -> 
Mc\0 " ) ; 
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put s ( 


”\t two 


- 


0 


- j> 


RAMO , 


0 




Q0 \ 0 " ) : 


pu t s ( 


" \ 1 1 h r e e 


= 


1 


-> 


RAMO , 


1 




Q0\ 0 


" s : 


pu ts ( 


"\tfour 


- 


Qn 


-> 


RAMO , 


0 


y 


Q0 , 


RAMn - 
Mc\0' : ) 


pu t s ( 


"\tfive 




Qn 


-> 


RAMO , 


1 


~ > 


Q0 , 


RAMn 
Mc\ 0 " ) 


pu t s ( 


"\t six 




Qn 


-> 


RAMO, 


0 


-> 


Q0\0 


tt \ . 


put s ( 


"\tseven 


= 


Qn 


- > 


RAMO , 


1 




Q0\ 0 


ft \ . 

J J 


pu t s ( 


"\teight 




RAMn 


-> 


RAMO , 


Qn 


-> 


Q0 , 


RAMn - 
Mc\ 0 " ) 


pu t s ( 


"\tnine 


- 


Me 


-> 


RAMO , 


Qn 


~> 


Q0 , 


RAMn - 
M c \ 0 ” : 


pu t s ( 


"\t 


A 




RAMn 


-> 


RAMO , 


Qn 


~ > 


Q0\0 


" j ; 


pu t s ( 


"\t 


B 


- 


Me 


~> 


RAMO , 


0 


~> 


Q0\0 


>' \ . 

) > 


put s ( 


”\t 


C 




Qn 


~> 


RAMO , 


Me 


-> 


Q0 , 


RAMn - 

Mc\ 0 " 


put s ( 


"\t 


D 


- 


Qn 


-> 


RAMO , 


RAMn 


— y 


Q0 , 


RAMn - 
M e \ 0 " } 


pu t s ( 


”\t 


E 


- 


Qn 




RAMO , 


Me 


— \ 
/ 


Q 0 \ 0 


M 


pu t s ( 


”\t 


F 




Qn 


~> 


RAMO , 


RAMn 


- > 


Q0\ 0 


"j ; 



puts(”\t H to get help with this procedure\0 Tt ); 
puts(”\t N to back up one f r ame . \ 0 ” ) ; 

} 

car ry i n_menu ( ) 

{ 

puts(erase_screen) ; 

puts( M \tThe Carry into the least significant stage of 

the ALU\0 ,T , 

puts(”is controlled by bits 112 and 111, and sometimes 

b i t s \ 0 " ! 

puts(”I5, 13, 12, and II. There are seven possible 

choices : \0" ) 

pu t s ( " \ t Type a zero to select ZERO as the carry 

- in . \0 " ) 

puts ( "\ tType a one to select ONE as the carry-in . \0 M : ; 
put s ( " \ t Type a two to select Cx, the Z output of the 

29203 . \ 0 r : 

puts(”\tType a three to select the carry bit from the 

micro reg\0") 

puts( tT \tType a four to select the micro carry bit 

complemented\0 M ) 

puts ( ”\ tType a five to select the MACRO carry bit\0"); 
pu t s ( " \ t Type a six to select the MACRO carry bit 

complemented 0”) ; 

puts ( "\ tType an H for help.\0 M ); 

> 

status 1 _menu ( ) 

{ 

put s ( er ase_screen ) ; 
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puts("\tBits 10 through 15 control the two different 

s t a t u s \ 0 " ) ; 

pu t s ( ” r eg i s t er s which may be selected. There are three 

m a i n \ 0 " ; 

puts( "choices to be made, and you can change either or 

both\0" ) ; 



puts("of the 
puts ( "\ t Type 

puts ( " \ t Type 

puts ( " \ t Type 

puts ( "\ tType 

} 



registers: \ n \ 0 " ) ; 

a ’O’ to make no changes to the status 

registers\0") ; 

a ’1’ to change the micro status 

register. \ 0") ; 

a ’2’ to change the MACRO status 

register. \0") ; 

a ’ D’ to exit from this section. \0"); 



status2_menu( ) 

{ 

puts(erase_screen) ; 

puts(”\tYou have chosen to modify the micro status 

register \ 0 " ) ; 

pu t s ( ” ( abb r e v i at ed uSR). There are 15 different 

choices : \0" ) ; 

puts ( "\ tType a zero to load the MSR into the uSR.\0"); 

puts("\tType a one to set all bits in the uSR\0"); 

puts("\tType a two to swap the MSR and the uSR\0"); 

puts("\tType a three to reset all bits to 0 in the 

uSR\ 0 ” ) ; 

puts("\tType a four to load the uSR from the imraed. 

inputs\0") ; 

puts ( ”\ tType a five to load all uSR from I except 

overf low\0" ) ; 

puts("\tType a six to load all uSR from I, invert carry 

b i t \ 0 " ) ; 

puts("\tType a seven to reset only the zero flag in the 

uSRNO" ) ; 

puts("\tType an eight to set only the zero flag in the 

uSR\ 0 " ) ; 

puts("\tType a nine to reset only the carry flag in the 

uSR\ 0 ” ) ; 

puts("\tType an A to set only the carry flag in the 

uS R\ 0 ’’ ) ; 

puts("\tType a B to reset only the sign flag in the 

u S R \ 0 " ) ; 

puts("\tType a C to set only the sign flag in the 

uSR\0 " ) ; 

puts ( "\ tType a D to reset only the overflow flag in the 

uSR\0 ’’ ) ; 

puts("\tType an E to set only the overflow flag in the 

uSR\0 " ) ; 



puts("\tType an H to get help\0"); 
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mic_stat_set(pchar) 

/ * This routine sets up the microstatus register, in 
agreement with the status2_menu. */ 



char *pchar; 

{ 

switch ( *pchar ) 

{ 

case ’O’: /* load the microstatus from the MACRO 

status * 



b it__clear 
bi t_clear 
b i t_cl ear 
bit_clear 
b i t_c 1 ear 
bi t_clear 
break ; 



( I05__04 ) 
( I04_04) 
( I03_04) 
( 1 0 2_04 ) 
( 10 1_04) 
( 1 0 0_04 ) 



case ’l’: /* set the microstatus register. */ 

bit_clear (I05_04); 
bit_clear (I04_04); 
bit_clear ( I 03_04 ) ; 
bit_clear (I02_04); 
bit_clear ( 1 0 1_ 04 ) ; 
b i t_set ( I00_04 ) ; 
break ; 



case ’2’: /* Swap the micro and MACRO status 

words. * 

bit_clear (I05_04); 
bit_clear (I04_04); 
bit_clear ( 1 0 3 _ 0 4 ) ; 
bit_clear (I02_04); 
bit_set ( I01_04) ; 
bit_clear (I00_04); 
break; 



case ’3’: / * zero the microstatus register. * / 

bit_clear ( 1 0 5 _ 0 4 ) ; 
bit_clear (I04_04); 
bit_clear ( I03__04) ; 
bi t_clear ( 1 0 2_04 ) ; 
bit_set ( I01_04) ; 
bit_set ( 1 0 0 _ 0 4 ) ; 
break; 



case ’4’: / * Load the microstatus register from 
the I pins. Many possible inputs here, need an auxiliary 
data structure. */ 
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case 



case 



case 



case 



case 



bit_set ( 1 0 5 _ 0 4 ) ; 
bit_set (I04_04); 
bit_set ( 1 0 3 _ 0 4 ) ; 
b i t_set ( I02_04) ; 
b i t_set ( 10 1_04 ) ; 
bi t_set ( I00_04) ; 
b reak ; 

’5’: /* Load from I, with overflow retain. */ 

bit_clear (I05_04); 

bit_clear ( I 04_04 ) ; 

bit_clear ( I03_04) ; 

b i t_se t ( I02_04) ; 

bit_set (I01_04); 

break ; 

’ 6 ’ : /* Load from I, with carry invert. Need 

to turn on 15 or 14 or both. * / 

bi t_set ( I03_04) ; 
bit_clear (I02_04); 
bit_clear (I01_04); 
break; 

*7’: /* Reset the zero flag. */ 

bit_clear ( 1 0 5 _ 0 4 ) ; 

bit_clear (I04_04); 

b i t_se t ( I03_04) ; 

bit_clear (I02_04); 

bit_clear (I01_04); 

bit_clear ( I 00_04 ) ; 

break ; 

’8’: /* Set the zero flag. */ 

bit_clear (I05_04); 
bit_clear (I04__04); 
bit_set (I03_04); 
bit_clear ( 1 0 2 _ 0 4 ) ; 
bit_clear ( 1 0 1 _ 0 4 ) ; 
b i t_set ( I00_04 ) ; 
break; 

’9’: /* Reset the carry flag. */ 

bit_clear (I05_04); 

bit_clear (I04_04); 

b i t_set ( I03_04) ; 

bit_clear (I02_04); 

bit_set ( I01_04) ; 

bit_clear (I00_04); 

break; 
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case ’ a ’ : 

case ’A’:./* Set the carry flag. * / 
bit_clear ( 1 05_04 ) ; 
bit _ clear (I04_04); 
b i t_set ( I03_04 ) ; 
bit_clear (I02_04); 
b i t_set ( 10 1_04 ) ; 
b i t _ s e t ( 1 0 0 _ 0 4 ) ; 
break; 



case ’ b * : 

case ’B’: /* Reset the sign bit. */ 

bit_clear (I05_04); 
bit_clear ( 1 0 4 _ 0 4 ) ; 
b i t_se t ( I03_04 ) ; 
b i t_set ( I02_04) ; 
bit_clear (I01_04); 
bit_clear (I00_04); 
break; 

case ’ c ’ : 

case ’C’: /* Set the sign bit. */ 

bit_clear (I05_04); 
bit_clear (I04_04); 
b i t_set ( I03_04 ) ; 
b i t_se t ( I 02_04 ) ; 
bit_clear ( 10 1_04 ) ; 
b i t _ s e t (I00_04); 
break; 



case ’ d ’ : 

case y D 9 : /* Reset the overflow bit. */ 

bi t_clear (I05_04); 
bit_clear (I04_04); 
b i t_set ( I03_04 ) ; 
bit_set (I02_04); 
b i t _se t ( 10 1 _04 ) ; 
bit_clear (I00_04); 
break; 

case 9 e * : 

case ’ E ’ : /* Set the overflow bit. */ 

bit_clear (I05_04); 
bit_clear (I04_04); 
b i t_set ( I03_04 ) ; 
b i t_se t ( I 02_04 ) ; 
bit_set ( I01_04) ; 
bit_set (I00_04); 
break; 

default: 
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puts ( ” No help implemented yet. \n\0"); 

sleep ( 2 ) ; 

break; 



} 



} 



s t atus3_menu( ) 

{ 

puts(erase_screen) ; 

puts("\tYou have chosen to modify the MACRO status 

register \ 0" ) ; 

pu t s ( " ( abb r ev i a t ed MSR). The MSR is also controlled by 

f i ve\0 " ) ; 

put s ( " enab 1 e bits, which are set on the next menu. \0 M ; ; 
puts("There are 8 different choices in this menu: \ 0 M ) ; 
puts ( "\ tType a zero to load the Y inputs into the 

MS R\0 " 1 ; 

puts( Tf \tType a one to set all bits (if en ab 1 ed ) \ 0 ” ) ; 
puts ( "\ tType a two to swap the MSR and the uSR\0 M ); 
pu t s ( " \ t Type a three to reset all bits (if 



en ab 1 ed ) \ 0 ” ) ; 

pu t s ( M \ t Type a four to swap the Me and the Movr\0”); 
puts( M \tType a five to complement all bits\0 Tt ); 
puts( M \tType a six to load all MSR from I, invert 

car ry\0 " ) ; 

put s ( "\ tType a seven to load all MSR from I\0" ; 

} 



macro_stat__set(pchar) 

/* This routine deals with the loading of the 

Macro status register.*/ 

char *pchar; 

{ 

switch ( *pchar ) 

r 

i 

case ’O’: / * Load Y inputs into the MSR * / 

bit__clear (I05_04); 
bit_clear (I04_04); 
bit_clear (I03_04); 
bit_clear ( 1 0 2 _ 0 4 ) ; 
bit__clear (I01_04); 
bit_clear (I00_04); 
break; 

case ’ 1 ’ : /* Set all bits in the MSR */ 

bit_clear (I05_04); 
b i t _c 1 ear (I04_04); 
bit_clear (I03_04); 
bit_clear (I02_04); 
bit_clear (I01_04); 
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b i t_se t ( 1 0 0 _ 0 4 ) ; 
break; 



case ’2’: /* Swap the MSR and the uSR */ 

bit_clear (I05_04); 
bit_clear (I04_04); 
bit_clear (I03_04); 
bit_clear (I02_04); 
bit_set ( 1 0 1_04 ) ; 
bit_clear (I00_04); 
break ; 

case ’3’: / * Reset all bits in the MSR * / 

bit_clear (I05_04); 
bit_clear (I04_04); 
bit_clear (I03_04); 
bit_clear (I02_04); 
bit_set (I01_04); 
bit_set ( I00_04 ) ; 
break ; 



case ’4’: / * Swap the Me and the Movr */ 

bit_clear (I05_04); 
bit_clear (I04_04); 
bit_clear (I03_04); 
b i t_set ( I02_04 ) ; 
bit_clear (I01_04); 
bit_clear (I00_04); 
break ; 



case ’5’: /* Complement all bits in the MSR */ 

bit_clear (I05_04); 
bit_clear (I04_04); 
bit_clear (I03_04); 
b i t _s e t ( I02_04) ; 
bit_clear (I01_04); 
bit_set (I00_04); 
break; 



case ’6’ : / * Load the MSR, with the carry 

inverted. Several choices here, need to implement the 
decision process. Turn on 104 or 105, or both. 100 is a 
don ’ t care . */ 

bit_set (I03_04); 
bit_clear (I02_04); 
bit_clear (I01_04); 
break; 

case ’7’: /* Load the MSR from the I inputs. 

/* Many choices here. */ 

bit_set (I05_04); 



203 



} 



b i t_set ( I04_04 ) 
bit_set ( I03_04) 
b i t_se t ( 102.04) 
bit_set (I01_04) 
bit_set ( I00_04 ) 
break; 



/* The s t atus4_raenu is not used with the eval board, since 
/* the individual status enables are not in the microword. */ 
s t a t us4_menu ( ) 

{ 

put s ( erase_screen ) ; 

puts ( "\ t There are six enable inputs to the status 

registers \ 0 M ; : 

puts( t? on the 2904. They are a master enable for the 

uSR,\0 M ) ; 

puts( M a master enable for the MSR, and individual 

enable for\0 tf ) ; 

puts("the four bits of the MSR (zero, carry, sign, 

overflow) . \0" • ; 

puts(”You must chose which of these enables to 

activate. \0 tf ) : 

puts("\tType a zero to activate the micro status 

register \0’ f ) ; 

put s ( " \ t Type a one to activate the MACRO status 

register \0” ) : 

puts ( "\ tType a two to activate the zero flag in the 

MS R\ 0 ff ) ; 

puts ( M \ tType a three to activate the carry flag in the 

MSR\0" ) ; 

put s ( M \ tType a four to activate the sign flag in the 

MSR\0 ” ) ; 

puts( M \tType a five to activate the overflow flag in 

the MS R\ 0 ” ' : 

puts("\tType a six if you want the rest of the flags 

d i s ab 1 ed\ 0 ,f ) ; 

puts( H \tType an H for help.\0 n ); 
j 

status5_menu( ) 

j 

puts(erase_screen) ; 

puts( M \tYou can output something from the 2904 

onto\0 n ) ; 

puts("the Y-bus. What do you want on the bus?\0 n ); 
put s ( tf \ tType a zero to output the micro-status 

register\O f ’) ; 

put s ( "\ tType a one to output the macro-status 

regist er\0 M ) ; 
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puts(" \tType a two to output the immediate inputs 

f roni' 0 f ‘ 

putsr M \ t\t the ALU\0 Tt ); 

put s ( " \ t Type a three for no output\O ff ) ; 

} 



s tat us6_menu ( ) 

{ 

puts ( er ase_screen ) ; 

puts("\tWhat condition do you want reflected by the 

condition \ 0 " ) 

puts(''code output?\0" ) ; 

puts("\tType a zero for (SIGN exor OVR) or ZERO\0"); 
puts ( "\ tType a one for (SIGN exnor OVR) and not 

ZERONO" ) 



puts ( "\ tType 
puts ( "\tType 
puts ( "\tType 
puts ( "\ tType 
puts("\tType 
puts ( "\tType 
puts ( "\ tType 
puts ( "\tType 
puts ( "\ tType 
puts ( "\ tType 
puts("\tType 
puts("\tType 
puts ( "\ tType 
puts ( "\ t Type 
} 



a two for (SIGN exor OVR)\0"); 
a three for (SIGN exnor OVR\0"); 
a four for ZERO\0"); 
a five for not ZERO\0"); 
a six for OVR\0"); 
a seven for not OVR\0"); 
an eight for (CARRY or ZERO)\0"): 
a nine for (not CARRY) or (not ZERO)\0 
an A for CARRY’\0”); 
a B for not C ARRY\ 0 " ) ; 
a C for (not CARRY or ZERO)\0"); 
a D for (CARRY or not ZERO)\0”); 
an E for SIGN\0") ; 
an F for not SIGN\0" ) ; 



cond_2_set(pchar) 

/ * This is the second level selection of the cond 

test * 

char ( *pchar) ; 

{ 

switch ( *pchar ) 

{ 

case ’O’: /* SIGN exor OVR or ZERO */ 

bit_clear ( I03_04) ; 
bit_clear( I02_04) ; 
bit_clear(I01_04) ; 
bit_clear( 1 0 0 _ 0 4 ) ; 
if ( micro_word [ I05_04 ] == ’O’) 
bit_erase( I04_04) ; 
break ; 



case ’l’: /% SIGN exnor OVR and not ZERO */ 

bit__clear( I03_04) ; 
bit_clear( I02_04) ; 
bit_clear( I01_04) ; 
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case 



case 



case 



case 



case 



cas e 



bit_seti 1 0 0 _ 0 4 ) : 
if (micro_word[I05_04] 
bit_erase( 1 04_ 04 ) ; 
break ; 

’ 2 ’ : /* SIGN exor OVR 

bit_clear(I03_04) ; 
bit_clear(I02_04) ; 
bit_set(I01_04) ; 
bit_clear(I00_04) ; 
if ( micro_word [ I05_04 ] 
bit_erase(I04_04) ; 
break; 



’ 3’ : /* SIGN exnor OVR 

bit_clear( I03_04) ; 
bit_clear(I02_04) ; 
bit_set(I01_04) ; 
bit_set( I00_04) ; 
if ( m icr o_word [ I05_04 ] 
bit_erase(I04_04) ; 
break ; 



’ 4 ’ : /* ZERO */ 

bit_clear(I03_04) ; 
bit_set( I02_04) ; 
bit_clear(I01_04'> ; 
bit_clear( I00_04) ; 
if ( m i c r o_wo rd [ 1 0 5 _04 ] 
bit_erase(I04_04) ; 
break ; 



’5’ : /* not ZERO */ 

bit_clear(I03_04) ; 
bit_set(I02_04) ; 
bit_clear( I01_04) ; 
bit_set(I00_04) ; 
if (micro_word [ I05_04 ] 
bit_erase(I04_04) ; 
break; 



’ 6’ : /* OVR */ 

bit_clear( I03_04) ; 
bit_set( 1 02_ 04 ) ; 
bit_set(I01_04) ; 
bit_clear( I00_04) ; 
if ( ra i c r o_wo r d [ I 05 _04 ] 
bit_erase(I04_04) ; 
break ; 



’ 7 ’ : /* not OVR */ 



= ’ 0 ’ ) 



*/ 



= ’ O’ ) 



*/ 



= ’O’ ) 



= ’O’ ) 



= ’O’ ) 



= ’ O’ ) 
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bit_clear(I03_04) ; 
bit_set( 1 0 2 _ 0 4 ) ; 
bit_set(I01_04;; 
bit_set( I00_04) ; 
if (micro_word [ I05_04 ] == ’O’) 
bit_erase(I04_04) ; 
break; 

case ’8’: /* CARRY or ZERO */ 

b it_set ( I03_04 ) ; 
bit_clear( I02_04) ; 
bit_clear( 1 0 1_04 ) ; 
bit_clear(I00_04) ; 
if ( raicr o_wor d [ I05_04 ] == ’O’) 
bit_erase(I04_04) ; 
break; 

case ’9’: /* not CARRY or not ZERO */ 

bit_set(I03_04) ; 
bit_clear( I02_04) ; 
bit_clear(I01_04) ; 
b i t_se t ( I00_04 ) ; 
if (micro_word [ I05_04 ] == ’O’) 
bit_erase(I04_04) ; 
break ; 

case ’ a ’ : 

case ’ A’ : /* CARRY */ 

bit_set( 1 0 3 _ 0 4 ) ; 
bit_clear( I02_04) ; 
bit_set( 1 0 1 _0 4 ) ; 
bit_clear( I00_04) ; 
if (micro_word [ I05_04] == ’O’) 
bit_erase(I04_04) ; 
break; 

case ’ b ’ : 

case ’ B ’ : /* not CARRY */ 

b i t_set ( I03_04 ) ; 
bit_clear(I02_04) ; 
bit_set( 10 1_04 ) ; 
bit_set(I00_04); 
if ( m i cr o_word [ I 05_04 ] == ’O’) 

bit_erase( I04_04) ; 
break; 

case ’ c ’ : 

case ’C’: /* not CARRY or ZERO */ 

bit_set( I03_04 ) ; 
b i t_set ( I02_04 ) ; 
bit_clear(I01_04) ; 
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bit_clear(I00_04) ; 
if (micro_word[I05_04] == ’O’) 
bit_erase( 1 0 4 _ 0 4 ) ; 
break; 

case ’ d ’ : 

case ’D’: /* CARRY or not ZERO */ 

bit_set( I03_04) ; 
bit_set( I02_04) ; 
bit_clear( I01_04) ; 
bit_set( I00_04) ; 
if ( ra i c r o_wo r d [ I05_04 ] == ’O’) 
bit_erase( I04_04) ; 
break; 

case ’ e ’ ; 

case ’ E ’ : /* SIGN */ 

bit_set( 1 0 3 _ 0 4 ) ; 
bit_set(I02_04) ; 
bi t_set ( 10 1_04 ) ; 
bit_clear( 1 0 0 _04 ) ; 
break ; 

case ’ f ’ : 

case ’ F’ : /* not SIGN */ 

b i t_set ( I03_04) ; 
bit_set(I02_04) ; 
bit_set(I01_04); 
bit_set(I00_04) ; 
break ; 

def ault : 

puts("No help yet.\n\0"); 
sleep ( 2) ; 
break ; 

} 

} 

st atus7_menu ( ) 

{ 

puts ( erase_screen) ; 

puts("\tThere are two steps to selecting a test 

condition. T h e \ 0 ” ) ; 

puts( "first is to select a register to be used, and the 

second \0" ) ; 

puts("is to select a test on that register. This menu 

selects \ 0 " ) ; 

puts("the register, or two special tests which combine 

t w o \ 0 " ) ; 

puts(" registers. \n\0") ; 

puts("\tType a zero for the micro status r eg i s t e r \ 0 " ) ; 
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puts ( M \ tType a one for the MACRO status register\0 M ) ; 
puts("\tType a two for the Immediate status inputs\0" 
put s ( "\tType a three for Immediate SIGN exor Macro 

SIGN\ 0" ) 

pu t s ( ” \ t Type a four for Imm. SIGN exnor MACRO SIGN'.O" 

} 

cond_l_set(pchar) 

/* This is the first level cond. code select, and 

matches s tat us7_menu . * 

char *pchar; 

{ 

int next_level ; 
next_level = TRUE; 
switch (*pchar) 

{ 

case ’O’: / * Micro status register selected, t / 

bit_clear( I05_04) ; 
bit_set( I04_04) ; 

/* Note that 104 can be cleared for many cases, see Tbl. 4, 

Pg 5-79 */ 

break; 

case ’1’: /* Macro status register. */ 

bit_set(I05_04) ; 
bit_clear(l04_04) ; 
break; 

case ’2’: /* Immediate Inputs. */ 

bit_set(I05_04) ; 
bit_set(I04_04) ; 
break; 

case ’3’: /* Imm. sign exor MSR sign */ 

bit_clear( I05_04) ; 
bit_clear(I04_04) ; 
bit_set(I03_04) ; 
bit_set(l02_04); 
bit_set( 1 0 1 _04 ) ; 
bit_clear(I00_04) ; 
next_level = FALSE; 
break; 

case ’4’: /* Imm. sign exnor MSR sign * / 

bit_clear(I05_04) ; 
bit_clear(I04_04) ; 
bit_set(I03_04) ; 
b i t_set ( I02_04 ) ; 
bit_set(I01_04) ; 
bit_set( I00_04) ; 
next_level = FALSE; 
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break ; 



default: 

putsf" No help available yet. \n\0"); 
puts(" Start this process from the beginning 

again . \n\ 0 M } 

next_level = FALSE; 

s 1 eep ( 2 ) ; 

break; 



} 

return (next_level); 

} 



shift_set(pchar) 
char *pchar; 

{ 

int backout; 
backout = 0; 
switch ( *pchar ) 

{ 

case ’ 0 ’ : 

bit_clear(I09_04) ; 
bit_clear(I08_04) ; 
bit_clear(I07_04) ; 
bit_clear( I06_04) ; 
break; 

case * 1 * : 

bit_clear( I09_04) ; 
bit_clear( I08_04) ; 
bit_clear(I07_04) ; 
bi t_set ( I06_04 ) ; 
break ; 

case * 2 * : 

bit_clear(I09_04) ; 
bit_clear( I08_04 ) ; 
bit_set(I07_04) ; 
bit_clear(I06_04) ; 
break ; 

case ’ 3 ’ : 

bit_clear(I09_04) ; 
bit_clear( I 08_04 ) ; 
bit_set( I07_04) ; 
bit_set(I06_04) ; 
break ; 

case * 4 ’ : 
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bit_clear( I09_04 ; ; 
b i t _se t ( I08_04 ) ; 
bit_clear(I07_04) ; 
bit_clear( 1 0 6 _ 0 4 ) ; 
break ; 

case ’ 5 ’ : 

bit_clear( 1 0 9_0 4 ) ; 
b i t_set ( I08_04 ) ; 
bit_clear(I07_04) ; 
bit_set ( I06_04) ; 
break ; 



case ’ 6 ’ : 

bit_clear( I09_04) ; 
b i t_set ( I08_04 ) ; 
bit_set( 1 0 7_04 ) ; 
bit_clear(I06_04) ; 
break; 



case 5 7 ’ : 

bit_clear( I09_04) ; 
b i t_set ( I08_04 ) ; 
b i t_set ( I07_04) ; 
b i t_set ( I06_04 ) ; 
break; 



case ’ 8 ’ : 

bit_set(I09_04) ; 
bit_clear( 1 0 8_04 ) 
bit_clear(I07_04) 
bit_clear(I06_04) 
break ; 



case * 9 ’ : 

b i t_se t ( I09_04 ) ; 
bit_clear( I08_04) ; 
bit_clear(I07_04) ; 
b i t_se t ( 10 6_04 ) ; 
break; 

case * a * : 
case ’ A ’ : 

bit_set(I09_04) ; 
bit_clear( I08_04) ; 
b it_set ( I07_04 ) ; 
bit_clear( I06_04) ; 
break; 

case ’ b * : 
case ’ B ’ : 
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b i t_set ( I09_04 ) ; 
bit_ciear(I08_04) ; 
bit_set ( I07_04) ; 
bit_set( I06_04) ; 
break ; 

case ’ c ’ : 
case ’ C ’ : 

bit_set( I09_04) ; 
bit_set(I08_04) ; 
bit_clear(I07_04) ; 
bit_clear( I06_04) ; 
break; 

case ’ d ’ : 
case ’ D ’ : 

b it_set ( I09_04 ) ; 
bit_set(I08_04) ; 
bit_clear( I07_04) ; 
bit_set(I06_04) ; 
break; 

case ’ e ’ : 
cas e ’ E ’ : 

bit_set(I09_04) ; 
bit_set(I08_04) ; 
bit_set(I07_04) ; 
bit_clear(I06_04) ; 
break ; 

case ’ f ’ : 
case ’ F ’ : 

bit_set(I09_04) ; 
bit_set( I08_04 ) ; 
bit_set( I07_04) ; 
b i t_set ( I06_04 ) ; 
break ; 

case ’ n ’ : 
case ’ N ’ : 

backout = 1 ; 
break ; 

def ault : 

puts( "Sorry, No help yet - you’re on your 

own . \n\ 0 " ; 

s leep ( 2 ) ; 
break ; 

} 

return (backout); 

} 
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carry_set(pchar) 
char *pchar; 

{ 

switch (*pchar) 

{ 

case ’O’: /* carryin of zero */ 

bit_clear(I12_04) ; 
bit_clear(Ill_04) ; 
break ; 



case ’1’: /* carryin of one */ 

bit_clear(I12_04) ; 
bit_set(Ill_04); 
break'; 

case ’2’: /* carryin of Cx */ 

bit_set( I12_04) ; 
bit_clear(Ill_04) ; 
break ; 

case ’ 3 ’ : /* carryin of micro carry */ 

/* Three possible choices here, how do we record and 

decide? * / 

b i t _set ( 1 12_04 ) ; 
bit_set(Ill_04) ; 
bit_clear(I05_04) ; 
bit_clear(I03_04) ; 
b reak ; 

case ’4’: /* carryin of micro carry not */ 

bit_set ( I12_04) ; 
bit_set(Ill_04) ; 
bit_clear(I05_04) ; 
b i t _s e t ( I03_04) ; 
bit_clear(I02_04) ; 
bit_clear(I01_04) ; 
break; 

case ’5*: /* carryin of MACRO carry */ 

/* Two other choices here, same problem as case 3 */ 
bit_set(1 1 2_04 ) ; 
bit_set(Ill_04); 
b i t_set ( I05_04) ; 
bit_clear(I03_04) ; 
break; 



case ’ 6’ : /* carryin of MACRO carry not */ 

b i t_set ( I12_04) ; 
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b i t _s e t ( 1 1 1_04 ) ; 
b i t_se t ( 1 05_04 } ; 
bit_set(I03_04) ; 
bit_clear( I02_04) ; 
bit_clear( I01_04) ; 
break ; 

default: / * Help message on default * / 

puts("No help available yet ! ! \n\0 " ) ; 
s leep ( 2 ) ; 
break ; 
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Program Name: declare. h 

Purpose: This file is included with all other modules. 

When compiling the modules, this file must be 
in the same directory. 



/* declare. h is the latest header file for declarations for 
use with the 2900 system functional m i c r op r ogr am i ng effort. 
This source is set up to work with the vtlOO from 
VAX/unix. */ 

/* This header file should be M #included" with all 
modules . % / 



/* LAST UPDATE: 5 sep 1984 */ 



#def ine 


erase_ 


screen 


" \033[2J\033[0; OH" /* vtlOO erase 
screen and home cursor 


#def ine 


TRUE 


1 




#def ine 


FALSE 


0 




#def ine 


false 


0 




#def ine 


true 


1 




#def ine 


no_sub 


0 





/* These 


defines 


relate 


to the 29203ET board, and should 


contained 


i n 


a rout ine t c 


> initialize them, rather than as 


defines. 


*/ 








#def i ne 




112 


04 


16 


#def ine 




111 


04 


17 


#def ine 




no 


04 


8 


#def i ne 




109 


04 


28 


#def ine 




108 


04 


29 


#def i ne 




107 


04 


30 


#def ine 




106 


04 


31 


4 def ine 




105 


04 


18 


#def ine 




104 


04 


19 


#def ine 




103 


04 


20 


#def ine 




102 


04 


21 


#def ine 




101 


04 


22 


#def ine 




100 


04 


23 


#def i ne 




Ceu 


04 


24 


#def ine 




CeM 


04 


25 


#def ine 




Se_ 


04 


27 


#def ine 




Cmd 


E n 


26 


# d e f i n e 




Cmd 


_ 3 


28 


#def ine 




Cmd 


2 


29 


#def ine 




Cmd 


~1 


30 


#def i ne 




Cmd 


0 


31 
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/ * these 
mi croword . 

#def ine 
#def ine 
#de f i ne 
#def ine 
#def ine 
#def ine 
#def i ne 
#def ine 
#def ine 
#def ine 
#def ine 
#def i ne 
#def ine 
#def ine 
#def ine 
#def ine 
#def ine 
#def ine 
#def i ne 
#def i ne 
#def ine 
#def ine 
#def ine 
#def ine 
#def i ne 



defines refer to the physical fields of the 
They are used to pass field_set the fields */ 

reg_src 1 
ien_fld 2 
oey_fld 3 
src_fld 4 
des t _ f 1 d 5 
func_fld 6 
carryin_fld 7 
I5I4_f Id 8 
I3_I0_fld 9 
I5_I0_f Id 10 
ceu_ fid 11 
cera_fld 12 
cmden_fld 13 
shif ten_f Id 14 
command_fld 15 
shi f t_f Id 16 
breakpoint_f Id 17 
notused_fld 18 
msb_br_fld 19 
mid_br_fld 20 
lsb_br_f Id 21 
rega_fld 22 
r egb_ f 1 d 23 
s eq_ fid 24 
condtest fid 25 
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Program Name: extern. h 

Purpose: This file is included in all modules which are not 

’’main" programs. It must reside in the same directory 
in which all compilations are made. 



/* This header file used to assign external definitions to 
all files except the main program. The original definitions 
should be contained in the main program. */ 

/* LAST UPDATE: 5 Sep 1984 */ 

extern int docu_wor d [ 24 ] ; 

extern char cmd_line[80],*pcrad,micro_word[49],*pmwd; 
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APPENDIX C 



The following is the Compatibility Test program. It demonstrates the 
algorithm for finding compatible bit patterns when conflicts occur in 
shared microword fields. 



#include vstdio.h> 



/ * We need a static data structure which holds the different 
choices available for bits 15 to 10 of the 2904. * 



char *cho i ces_04 ( n ) /* return a pointer to the nth choice.*/ 

int n ; 

{ 

static char ^choice [ ] = { 

"0X0 XXX" ,/* carry in = u carry, first choice -0 */ 

"0XX1XX" , /* carry in = u carry, second choice -1 */ 

” 0 XX XIX" ,/* carry in = u carry, third choice -2 */ 

M 1X0XXX" , /* carry in=Macro carry, first choice -3 */ 
"1XX1XX",/* carry in=Macro carry, second choice -4 */ 

" 1 X X X 1 X " , / * carry in=Macro carry, third choice -5 */ 



"00011X" 


,/* 


Load 


u 


register , retain overflow bit -6 * 


"X1100X" 


,/* 


Load 


u 


reg , 


invert 


carry, first choice -7 


"1X100X" 


,/* 


Load 


u 


reg, 


invert 


carry, second choice -8 


"XX010X" 


,/* 


Load 


u 


reg , 


imraed . 


, first 


choice. -9 */ 


"X10XXX" 


, /* 


Load 


u 


reg, 


immed . 


, second choice. -10 * 


"X1XX1X" 


, /* 


Load 


u 


reg, 


immed . 


, third 


choice. -11 */ 


"X1X1XX" 


, /* 


Load 


u 


reg, 


immed , 


, fourth choice. -12 * 


” 1X0 XXX" 


. /* 


Load 


u 


reg, 


immed . 


, fifth 


choice. -13 */ 


"1XXX1X" 


,/* 


Load 


u 


reg , 


immed . 


, sixth 


choice. -14 */ 


" 1 X X 1 X X " 


,/* 


Load 


u 


reg, 


immed . 


, seventh choice. -15 


"XX100X" 


. /* 


Load 


M 


reg, 


invert 


carry 


-16 */ 


"XXX11X" 


,/* 


Load 


M 


reg , 


immed , 


first 


choice -17 % / 


"XX1X1X’’ 


. /* 


Load 


M 


reg , 


immed , 


second 


choice -18 */ 


"XXllXX" 


,/* 


Load 


M 


reg, 


immed , 


third 


choice -19 */ 


"X10XXX” 


, /* 


Load 


M 


reg , 


immed , 


fourth 


choice -20 * 



"1X0XXX"/* Load M reg, iramed, fifth choice -21 */ 

}; 



return 

} 

main ( ) 

/ 

int n , i , conf 1 ict ; 
char ^result ; 



( choice 



[ n] ) ; 
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static char *ptrarray[]; 

printf("Pick your first choice for bits 15-10, 0-21\n ?T ); 

scanf ( "%d" , in) ; 

result = cho i ces_04 ( n ) ; 

ptrarray[0]=choices_04(n) ; 

printf( ,f ■od\n ,, ,result) ; 

printf("The nth choice picked is, %d, the bits are, 

°os\n",n, result ) 

printf ( "Pick your second choice for bits 15-10, 0-21\n";; 

scanf ( ,, M M , &n ) ; 

result = choices_04 ( n) ; 

ptrarray [ 1] =choices_04(n) ; 

printf("The nth choice picked is, %d, the bits are, 

*s\n" ,n, result) 



printf("Ptrarray[0]= ^c\n M , *ptrarray [0] ) ; 
print f ( " Ptrarray [ 1] - %c\n",*ptrarray[l]); 
printf( M the value which starts at ptrarray[0] is 

%s\n”,ptrarray[0] ) 

printf( ,f the value which starts at ptrarray[l] is 

°os\n”,ptrarray[l] ) 



conf 1 ict =0 ; 



for (i=0;i<6;i++) 

i f ((*( pt r array [ 0 ] 4* i )==*( ptrarray [ 1 ] + i)):i 

(*(ptrarray[0] + i)==’X’ ! ! ^(ptrarray [ 1 ] + i ) = = ’ X ’ ) 

{ 

conf 1 ict=0 ; 

printf("conflict=0\n M ) ; 

} 

else { 

conf 1 ict =1 ; 

printf("conflict=l\n") ; 
break; 

> 

printf(” conflict = < od\n”, conflict); 
printf("The index, i= %d\n",i); 
if (conflict == 1) 

printf("Had a conflict!\n”); 
else 

printf("No conflicts ! \n" ) ; 
/*************%***********%%********%**%%******%%/ 



*ptrarray[0j=’0’ ; 

*ptrarray[l]=’ 1’ ; 
if(*ptrarray[0] ==*ptrarray[l] ) 
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printf(”They were equal”); 

else 

printf(”They were not equal") ; 
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